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0i:lS. 4 5 4* t^'7 7gft:0j!Sif 
a < 4*0 f>-f it a, -tfo*> < 0^-^w- 
r 4 < l T £>- < A 

* i- If, tf’pfr'ptz G i:#W6t Ji^-a-4 < 
4* (a.—r-0^1'4 5 fc4i'$fiei-tr 
b t*bltci.'*'4 < 4 * *' 

Gfc)„ 

:hif0^°ya>a-f-i: t o-cif 
“*>oA*<-C, jgi'"^77i:4 **• {. I 
ft4i'ttft£, 4 5 c-5 Alf, 4ftC 4“Fl 
-7 77 •^'°y a 7’ -r'{)19!o TC'fUf'C'l'o 
4 5 i' 5 '*7 a74 G-DS! L 4 < T 11' < 
G-r(>ai-c< *„ 

K'0X t°— K'* s ±* s o7, 4 1 #**® 
ife-f a.—-If'— i: tot IflSEl'^Tf'-'fy a 
74-^n*B#ftI:4o*0A**-G, I'ii 
-£ i f o A < it 5 A«4*Mfi life: ft*- 


G0-’'°ya7lf, till-** 1 *‘ G( 1 = 9 A 
If X i'*>4 c> J P C' It 4 C' If T *'£> *„ 

Tf'lf, C'oAl' £ 5 l' 5 a 7* f *S 
i:*S40-tr *h 5*'? UGGA, Aft 
4t t'l'g-C G it* <* G i'4 «i>, {> 

5 to < cft*>* ? ^oTi.'*A4>5 It if ) 0 

Apple0Macintosh J 4 > , EHsC0TRON7°b 
• y'i 7 b 4 t'"Cjil* T C' * t 7 • -v 7 7 • 

4 7 7 7 i 4 X 0*|p|-|4lf, "What you 
see is what you get” t C'5 ^ X *1-^0" 

I'tl' *o 

Z<D “WYSIWYG” t If, ^-U'SS**, g 
^**3 7U°jl— 7±t' J P 0 Ac'-ftlv^-, A A 
* > hlJl0±t' J 4oTt'*0tlBlGf 5 Cg 
i:lii»i:t* ti>5#x*-r, A t x 
If'7 7 4 A'4fPJP& L A It Alf', 4 074a 
7 4a"$®74 37Uj|oTl'ottt * 
t*>, **0 tiffU h fit h A c' ®*lf, t 

^x-nitT^nif'fI- 1 *>, -ri om' 

Jf't) a 7 7 b" A A 4tJbP4 l At*(15**4 0 
T'**o 

X68OOO0t i — 774 77 7^4 X fe, 
C0Kb^4ffloTt'* f 5 A'* f , £ 5 •’P G 
MS-DOS t0KI(#,4ffim LTt' * Jo'*-lff', 
c. 0# X*4®l£-r & 4 *'o A f 5 A4 
A t xlf't.S!i0 1''7^A"**, 
7—7°n-r'1t*'4®li7mf', 7 — 7 °bX 
*-r * * w t 4^1" 7 4 a 7* ? g|jj6^i:# 
< d/m-T-.swp h 

* )o C 07 4 a 7 4*7';w 7 V y 7l"^lf', 
r 1- Ulf 7—7“B0X#A'jt @B±?SIT 
7—7 °b(WP.X) 4 jt4>_hlf * 0 A' o A A' 
L, 7 4 a70TCIf J Polf OMS-DOSffi 
07 7 4^1>-A4 5 S^S(ttC'5 o MS- 
DOS 107 7 4 A'OS«tt4 () oA® C If 
L**A04i'w t G U'. i’o 4IfiSfifF4 


A,tlx4< l 4?o A G £ 5 *"4> 5 *' i 
h,®50A* f , 45t* t74^K*-K 
* s (^x 4c'£ j p4t'*“tt.'oA^()IBl-x 
X < * 0 i«)w, X68OOO0k"7'j.7^7j.^ 
* s (fio T l' * 0lf, 37 7N-I>"fffil.' 

A4-t**Ai:to-C0 r fhi.'o45 0ffi 
fJ$j X'hh G U'. 

\?i? a.7 tvy 3.)v (377 K-=fc— K0£ 
G G**i£G±* ? **'4a--Hf'-* 5 IibR-C* 
*0lffF(B-t"l>*. Alt£, hL4i:h4fi 
G4C'A** “TITLE.SYS” 4lf*-0^®J 

C $ x G Jp o A G ISISj 7 — a. 7 a- 4 

o < DIIt^Si:4*o h Liti:-C'{)(HIx 
* 7 x t a 4 StaT 4 G L o t Si]0ltl)f. L 
'^Sflf 4i'*‘tS5. 

“x b°— K4It*"a-7 7ir'lf 4 < T,“x 
fc°-Ki:«ffG?ttA(£i.' J f 5 t5” 4 §(b 
T4G, I'^CGt^^^A-ri.'* 
5 Gi:ffi(.'*4^x*, 4n<"Gc'«^-r' 

4 ItidlfT' It4i' 0 

MS-DOS 0 -^ 61 '9jiz zt*b & -4bWlf 4<•' 

(tlfl'X, MS-DOS0 7 7 4 ^ If Ik* Alf 

5 **!.' i')o MS-DOS^ItI 1 At'Alf £ 5 tt 

a7i:1f(xAA4AA**‘G, 4 5t'5 
A0c t f -r-oset *^sif4i'0-r**o 
4 01SM0±4a.—-f— a 71 “ 

a.-7 4f'Jffl-f* A40*\ (±*-£7 7 b 
1 ti74®i'£' | ,'A4®4’, 4ft t L a 7 
7 4f5»fc<:f l Jffl1' *A40*'Lf o 

X 4 ^ is — 7 a 7 7 X T A tiHo'tC'l'If 

-f-tr**, i' j pab4itntfi'it4i'o 
^ya7 4(b5 11> C4 c i -T'fHh^o 
TftoTIfU'o 4 5 Tftlf', 

***oT, 

nt < sifr-r#*. 

st*i:, t i —774 4 77 7i 4 x 
If, iT“H0A»i: £A4 L0 4(^**'” 
41,®**; t *> G4(if *0tf**o 
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=/\ N 

SOUND PRO 68 K/ 
SWITCH.X/T.^'l'KSffll 

X68000^ffcffl*D6&Ute^ M££ 


68000 



^£^£X68000IZB;§£tfl\-ol3l\„ ^L/tP 
‘fenoisiw. ma>7CJz> 

YhH$U£SglDg:0<£-5o 

mm?-c>o xesoooewirs^^si:*, 

ZfflD-t-Catt<gSU. 


X i *? < rUSRy 7 h % 1 #©-t" Yt x* f 
51 gfc $ no t $-01 1 ' -o t:xmoo<?) y 7 h 
t a. 7tti51i:'t Y, *1*© L c ©PC- 9801 
©7" 7 7 A 7 9 7-)v, FM77AV© ? i— 
x -7 7 *y—Macintosh © fc" £7 t x y 7 
h 7-t-KJKor-A *#*©-»£ 
Cfti^y-KryYLTJSlLTi'JJ; 
5'C'i‘o 

SOUND PRO 68K(CZ-214MS) 

tt'Ci't —7°©lS j &t: i^SrlL-t-ci' 
it* s , cniii"5 sfiWS® 

FM g 111 g ft cf* 5 7z * (?) 7—n't' 

to X-BASIC©MMLti £ ftg#Y';ii#il(# 
j£ kft7>U L©-f't7)\ 

> K9 yy"$nti'«.^feii68^t*i 9 

£.<*9i-tA„ 9 t* © 

mj> s 7fi£-C g 577/ (i © S 1 4- if i tDij 11 £ l 
Z© y 7 m FM77AV fi¬ 
x'© i 3, — i/v 7 y 7 h 5 ^-~ 

J7j& ^7”y L X I 't to (56^1* S' 

t-7") o ;C0 7 7 h©jELWlH&l*15,800 

nit' 7 n tio-a > i t o 

$ t, SOUND PRO 68K-rt* ? 7^-7 
7 xt'Xw-t a fi^L It, VIP© 
«fc 7 t- OPM ©vytl?i: £ l&St 

5^e—K, nijja 

i • ^-TtC t, _t*f tj lig <, t’7 "7 — I' If t' 

4 * l-. j i t' p CM'CW&SftfcSt 

& 4 /— s^-t—K4 £&{§£., fifti-'Ctt' 

9 * f t> 5 15 SEltS ix-C u i t» 
SOUND PRO 68KU;lf ¥t'200^(7)#fer" 
-7 frltoTfc 9, /^©^feCif^n 



€ f no#fe4r^**LA:iFy7 , A' 5 ^-fy 
yt"— y *utM Lit. c. n © cot"- y ii 
fr L < J l J i: t IsEffl 5h-it. 

oi 9 ^a.—s^yyt"—y4* f <<>, 
* 4 -f fecOAR (7 y y y V' y h) 7/(1 j# 
*£W C SML ? t T A t: 9 t i' 7 7Y*fH {, g 
i g ftt'to 

S <> C, C ? L Tifl y h $ 
li®^5f3D#^t5 C t-CtmigCfitlSt 
S ~ t LY'^ i t„ /©^Hgli7i7yy 
lti®7nfflJ'>-ttlfi: If IS § ft T W 
g C 4 o 7.- (, cof t TP, SOUND PRO 68 
9 L iftitco^Yc Millie L t c> 
ito n©cor"-yiJ:BASIC( 0 ^fe 

77iAti xffifflt j;t * ? «rsgrt l. 
j&o T 5g5c* ? t$ § n-C c' Z> 5 i y y 
if"! yMUSIC PRO 68K (CZ-213MS: 
18,800 PI) ft fiito MUSIC PRO 



3DISS^— K 


68K-C'lidili5f ( H®i iATcHr 
Z’MfflV— 7°nli^, 7- Ky—A t y X" 

A^°y->colt^C J: S g®J##«^4- f 

tfilf:znitriz4c'4 7t 

L T^l# L ^ 7 t'to y"7 7 A 79 "9-» 
©Z’sSTAFF PRO 68K LfobAt, i$i: 
7°nlf|C0 7 — ^* ! '7 H*'© 8 U C*‘(1T t' 
o t^lii'COYS-rto 




uitmt 


L*'L, fco n 

gi4'X68000<7)MMLT'-f£\ ^tlT* 8/<- 

- I' 

xi^iuto ^ i 

<7)7*-? ^ n-v'y? h 7 -y ?±tZ®l'T>H 

Tl'ftl'MML<7)=l v> Ftto D.C.^D. 

# 115 <73 x-t7 !b y t 0 OTflSffl *(J If *' C 


S. ( Coda. Fine4' if, f5SHIfe*-<7)^^|£-§-*^<7) 

0 f -tt A,, male*> f -3 t X 0 0 ®L 

C ") Lo/:^]p4^ 

%&■&■*><$>zttnzmnaLT i■ 5-yyexny 

^rig^-r « c ^ tf-? S ±m iz£1±Z> 

(ItUfyO * -ti-A, L-. S fcXtUtT-^SrB|f, 


^1 

MML(MUSIC MACRO X? 



LANGUAGE) [D c ] 


TfeiiLM^ 

[D.S.] 


[SEGN0](Z ^ ^ 

[TO CODA] 

[*] 

[C0DA](C ^ vii 

[SEGNO] 

[$] 

[D.S ]frb(»tU% 

[CODA] 


[TO C0DA]^) s *b (7) ^ V% 

[FINE] 

[-] 

Z <7)ffi-§-<7)*^/Jv^T[SEGNO]4' £ 
mu mu fcmmtf&hzzi: £^-t 

Px 


xCDfillZcl; -o TLEFT, RIGHT(I^£*I U frlttz V, 
L-RtsjmizMJoL tzV U it 



1.LEFT ONLY ON 



2 .RIGHT ONLY ON 

3 .L-R ON 

■J X h 1 

•tf>'7°7u:/n ?'v a 



10 m_alloc(1,1024) 

20 m_a88ign(1,1) 

30 m_trk(1,"cegceg(* Jdfadfa[$Jcdefg| :ceg|ldfa: | |2: | |3ceggag[d.a.)dfadfa[d.c. ) 
(coda)cccc") 

40 m_play(1) 


X680007'>>-tJlcS;# 


Oh! MZ 1987.8. 























SWITCH ODttUfi 


§ A- l£Human68kTswitch 3 -7 7 K 4 
ffioftztA#yiTA? 
■x.'8'Tswitch.x4X"7'-'i'X y y X"f 4 kb 
ttCDftft c.4'i'X^9lJft HitK, 

T7'M XA-4#LA’A(> i'4©T'li4 

i'T’1 £ 7 ft. Human68k©3-—-if—X-7 
— j. 7 ,»m; <£ ftliswitch 3 -? > KlilUT© 

15&#HB«r#o-ci'* tsn-ci’i-r. 
RS-232C©?&;g 
X^ey-tX x'©f&S: 

I§®j7 y - /i ?x x©ffftiL 
t»B#©T''x x 7 X 7 'j. X V ©tt 
OPT. 2*-CDWC& 

@®©s 7 h x x h 
ft—T— K © ■)] -f Sd'S'i) ©Tift 
Li*L, K(;t4-ftftntTtt# 

1 J^/uo z z ii|Ko t 3 -? 7 K^e— Kft 

•i, 

switch ? 

tffti&AT&T < AT l'o switch.x©3 

■7> KX — i — ftigTjTfti l/:fao HftJ 
©7ogiT'fi-7-j.7;H: : | : i,'T£4ffl 
iiTTA, Kt'C.T0^lt7i a 7^ 
<:iefB?ftTi.'i-tf-/4©T4ftC> uoi'T 
Mffll it. 

—Tv_ctrl 

z © 3 -* 7 K ii+ft ; ©l;i®4Til t L A* t 
§ (DWli¥ 4}b£T 4 t ©TTft, 3 -? 7 K 
7 - a. — 4 a 2 . PI y vt jg©off r v- fc'-t — K 
lftiIXRTT4i'J: •? i: fcjli i Tft, 4 
Z li r w- E''¥-H?5|i, * ig> S a > h n — a> 

4Tfigi: ITi’it. ftiot 7H-?§-4& 
T < AT i' 0 X68000©IOCS 3-^*?tto 
Ti'itta. IOCS 3—/i/ ©$0C 1: TVCTR 
L A1' 5 ©AT 0 £ T„ z©3-7> K'Tli 
4 © A* sfcfT©Dl v- ft x X i: ^“x X - * 4 
R2 SWITCH.X©Ziy>Ky.r3.- 


Ahit. 

o i y, $03 4-fn/iiT 4 8 'SiSliv# ACT 
li/xt'o*'!) a —a 4Ao5©:tfc5§i: L 
T**-7T4©TT. t> k CMC At't & I* 
$odHh£l it. 

Lcd_mode 

Led k tii$m.© Z k TTft, Si| 11X68000 
c^^bx'T X7‘vx fto < ftDT'i£& o i 
TA. OSTBASIC4 CT'liOPT.l+OPT. 
2 ft—-c*5?fUix z t ATT i T&„ z 

©3-77KT£4©t |s coX'f 7*7 I' iSXR 
4ft 5 t ©ft. Led 4Jt£T 4 t 7t/ 
X 7 h ©ftSiino tiVXt^ll, Normal 4tn 
St 4 t Ao 5 ©ilf ROM tlSfJUT ftT 
t'4X^17 4 0 i to 

—Sram 

Sramli^ftZ 4'JTi> {,©©, X^e y ft 
'<7 r y T'T X7 y 7T ftT i' 4 fc 5 
*i|.6ft£ 0 i to ft- A i k J&. x. IXz ; C7° 
n 7 "7 a 4 Hi' TiSlBIjIfti: g®J^ft $ t 5 
:afttg-Cto Ut:®SBT4ffifflt 

4 A #> © 3 -7 7 K ftSramTT. 

L *> L RAM ft77lL Tttfflt 4 C 
li, ^ ftA'O-TftA'*-r CONFIG.SYS i: 
DEVICE = SRAMDISK.SYS ti’51 ft 4 
HTJnx&ljfA 0 i tA 0 
—PO-P8 

C tx G it, rtx D'V-7 h ©r"— X 4 
JgSt 8 I) ©T'to I>1bAA,65536fe^- 
K © t 7 — 3 — K 41]) t' £ t o P0 *> t> P3 
l£BASIC©COLOR [ ] XT'*gStSPO 

P3 t |WJ L t'to P4tP8li VST'flgo 
Tt' 5fe©4 7 4^.1) t 6 Af t*L 4>i 
o t jfti> i to BBM4 1 i:«IsnL'©i>4 

.1 < ^7*'0 itA"C L72o 

-Db 

z © 3 7 7 Hi ROM r'7x 7 14 D 
®J$tS{)©T't„ AA'L, Zft4ffifflt 

5 A * C ftRS-232C 4#o A 3 > k° ^ - X 


JttWJ4teffl:£i£ t L T ft, it 2ft© 3 
7 b°3. —X 4-ttfec L, — #4X— 5 
- K-TSifJLA* t ROM r'V < 7 f 4 ON I: 
L AX680004SDJ Lit 0 t4tX-5t 
^©iWlifti Lt: ROM r'X< 7 A'©tl®JX 7 -b 
-ix6 ©T'to h t ii'<T"A ; ?£ 
^t 4 iffto*', X>X77ftxX7t 
4ft L A 0 t 4 t X- 5 
y it. h t—t"^7i/7”jii®* f ^Sc'fti 
t ©f7°D X"7 7|)i]?g(:fxXT at AT 
HTU A 

—Xchg 

z © 3 7 7 K li A Y 7 X X -fc 7 F ©—*15 
4f AS t©Tto z©s-v 7 K 

T$B?ft4AA7XXIi¥,“ l©37 
Tto Z <x ii (iXchgTtaSt 4 lit© t '7 h 
0 A t, 2 A 1 4 0 4 hfix\, ~, ! i:$ jl 

TLi 5 i ©T'to Stttr^hAOOt S 

life k<D7*> M:My it. ZftTCH 
^©X —X 7°n7"7^43ll < fidilTT i 
tfto 

Hd_max 

* i y IftiUl t 4 TX: fc 41 . t JB 1 ' i t *\ 
7 '— K’r'ft x X©ti^c K 7 X 7''Sc4SxSt 
4 {> ©T’t. 

—Wait_prn 

z ftlj:tTFA7° y 7 X t: 4 1 : A 4tll ft t 
4t§fti:, 7°y 7Xt:if^Io Aftt 7° 
y 7XAf>Ii-*5-4il7T < 4 JTiofft 
©lW14?aSt 4377 KT'to l"l is A T 
COPY A-4ft l ft fc I 4 i"©ft*>lftHl|ft 
atU It ft If® 80 c:, t 7 h 7— h 7 
4 — X"4 t' 4teffii'©iift-ftft80CHS:SL 
Tfc < t i I'T'L i 5o 

—First_ky, Next_key 

Z© 2 00 3-7 7 KliA-4ftLTAf, 
A-y c-h i 4 i T©nYiHi tyt°- 
h©jt®4fXSt 4 3-77 KT, 3-77 KX 
-^-t:408^4^8045 £A*i.'T* 0 
it. 


k RS-232C© X n X T-7'Xi-* s T-^Tt 

S3 R0M7'/V7T5© / \tL^>.-ZL- 


-Rb232c 

=9600bpa Bits-8 

-Memory 

=1024k 

-Boot 

= STD 

-Eject 

=OFF 

-Opt2key 

=Tvctrl 

-Contrast 

= 14 

-Kana 

=Jis 

-Tv Ctrl 

=Off 

-Lc3_mode 

=Lcd 

-Sram 

=No use 

-P0 

=$0000 

-PI 

=$f83e 

-P2 

=$ffc0 

-P3 

=$fffe 

-P4 

=$de6c 

-P8 

=$4022 

-Db 

=OFF 

-Xchg 

= 0 

-Hd^rnax 

= 1 

-Wait prn 

=$80000 

-First ky 

= 3 

-Next Key 

= 2 

*** li ^ < 


'0 tt - * ***** 

1 Parity-None Stop-1 Xon 
2048k/••• 

HD0'HD15/2HD0"2HD3/ROM$?/RAM$? 

ON 

Normal 

0”15 

Aiu 

Tv 

Normal 

Ramdisk/Proflram 

> 

> T X h /t lx V hr-* 


ON(BO«_DB ¥< 0_p»li». 

0“ 15 ( 100 *n+200ms ) 'J b'- h _iT 
0” 15 (5*n~ 2 + 30ms ) \) ^ - h WMi 

s «»©tiT-r *** 


00FF1B0A 

00FF1B12 

00FF1B16 

+H 

ft 

B 

BCbp][address] 
BCC <bp>] 
BE[<b P >] 

BDC <b P >3 


D[size][<range>] 

E[size][address] 
Ftsize] <range> data 
G[=address][adress] 

H 

HI 

L[<range>] 

M <rang> address 


move.w *$FFFF,$00000ft0E 
bra.w $00FF0^7ft 
addq.l ♦S.A? 

:assemble 

display breakpoint 
:set breakpoint 
:clear breakpoint 
:enable breakpoint 
:disable breakpoint 
:reset break count 
:dump memory 
'.edit memory 
:fill memory 




display this 
:trace history 
: 1 is t 

:move memory 


R address,drive,sector,length 

iread device 

S[size]<ranoe> data :search memory 
T[=address][count] :trace 

L)[=address] [count] luntrace 

W address,drive,sector,length 

:write device 

X :display register 

XCreg] Register change 
Y/N :yes no ask 

Z[num=exp] :system variable 
?[exp] iprint expression(hex) 
??[exp] iprint expression(dec) 

¥ :loop command line 


operators + - * / & (and) I (or) ! (not) X (residue) ^ (exor) 
number Whex.) ¥??(dec.) _??(bin.) 

size s(byte) w(word) l(long) 


X68000ib ft tzC 7)^P b ft l 31 







JiLh© j; j IZswitchf'1 oft 

i>©t't* f , :nt03-7>t'o 

4*>i:lt&4 y^fflSG:te4 4vlt7* ? i 

I'tOtSHt, *l#iiBootl««tzli?-$r 

isatiut. 

Mfcoitt < t'Sft„ CtaMttt) 




$ TX68000©3i* 4^00 toi:x/ 
5 4 M s t> 0 it to, BASIC -7-^Txk: 
tier < L *•«!&$ ftt i' 4 -ttA* ? x 
68000 CD x 7° 5 4 Mi fa * 
zc-^fifisO 11' 4 -t„ -€- t> •€: t>, 2©X7°7 
4 h f i' 4 CYNTHIA i i' 7 t 

x 7 aLSI i: (iXlturbo3^'9-Cti a t4 0 
jf&**IS«>jX4 fttft4 0t‘t*' <o, ^7 7" 
4 7 7*1 Sh 0 * f -fc"fc">> Xf5 7 tfttSt'2 
4tf Lil'it. 4-|IIItBASICt'X7 0 7 
4 Mr»of *4 U5. 



#*fl<Ji:X68OOO0X7°7 4 Ht 12845C0 
xx'5 4 l« 7 V—> fc 2 tfc 0 ' 4 'x 77 ' 7 <? 
> KxV — >fr$$of i'4to xx°5 4 h 
:7V—vli^5r"4 t xO^+A-t 9 77 
-ieirtfHSftt i>* i>c9-cm*&m : k 
its it-flaw-, 

tg^it < ft4t„ C.CD7V—>ifeiz 
ltf-fco0X7°7 4 h ^'IFIs li4 ft4t© 
T'lBlIfti: 128I0 cdx 7°9 4 l'£ffiJ* > 1v t 
* ? -r' & 60 ft. 

■7 ^ a r ^-clM § ftt i' i <d it x 7 ° 5 
4 h TV — ^CDH^t/^Sd^-CD^-r'-t* 5 ', 
£18 Cl* t> o t £ < ©«fig* s BASIC*^l!lI 
fflftft&t'to «4liX7°54 MW«cd-7- 

*7*«re«3nf & 

— > 3 — K4HLt kbil'i t 7 I- X 

7°5 4 h 0fK7jxlt^i:''°7 — > 3? k <D 4 4 
WfX USUXU <, |o]B^C'”>°^ —>cdH] 
*54 £i> flat's 4 i 5»:4ot(.'4t. 
Ot'7©xx°5 4 I-' * 7 — v It 16fef 
$ft4t* ? , 2 cDi 6 feit 65536feifi6fe4 

HtflLt'V -7 -t o X680 

00lt2 7 Oofv'V '7 h 4l5fflf$x 11' £ 
t*'^Bffi^-C'240fe<7)fe^I£ffl-!r§ 4 
©ft. 

:n60X7*74 h It 1024X 1024©fK*g 
M±-r®iHftfe $ n 4 t* s , it® 

®*±PS* S (-16,-16) L44t 7 t:|££? 

ftfl'4to MSX^Xr 5 3 VCDX7V4 

J2 Oh! M2 1987.8. 


i -nttgit&ti t ** i k x h tn 

4 iv-x 1 2 t atb !> 4 l ta* X 68000 X 
lt*A42 tltiC't 7-rto 4t, 
K9i7©iliiJ^ji:t 0 <t^|a]ir|p]#(:^ 
•r§> S^V->lt32ffli:Pliifttft4 t(® 
iS®®±)o L*‘l, 3210CDx7°5 4 h t ft 
i lt*^^®®±-r' l ^JirM^'S t 512 K x 
h, K x M&Cffla L 4 

to 2ftt'ltt>ftlt\ *7 034 2 fc 144ft 
-r l 1 7 o 

* ft i: *>t L •> < x 75* x t > K’7V—> (a 

TBGtHSt) tft7©ltXl©PCG«ngt 
ltlt'|5]C {, ©f, 1 #t©7V —>(264X64 

jl©'->°7->4^l4t„ 2©BGIt512 
X512^e— Ktlt 1 s<tt — >**16X16, 256 
x256-t— Kt'lt 1 '<$ — >* ! 8 x 8 Kx h 

If^tiOit. i bg tv—> 

CD#G8clt256X256^— Kt 2 ft, 512X512 
•t — Kt' 1 tk, tztS L x>°x 4 I- — > 
«rl28fflJ3Lt3t«t*»^, BGXV —>0 
it!ES;c«^$ni 4tA„ 

BG ^«7Pgltifi;® BG 7V->4-*g£ 
t 5 1 &XV — > ^>* 1 ) D o It /2 r A x 

>t:t Mia^t 4 0 4 to 

14 tAfPCGtPCt 7 I:-fit! i sort 
*\ PCGtit7©lt2tLli©XV->*?2 
K?4in:xt O—7i/f |t 6. 2 t, Ot OCD 
—>i:o^l6/65536fe*tHS-C'|i 4 2 

141' -rt o bg itaant'^ -r > x * -tn 

ii'X 2 tl-ltCj , i.''fC'4tA*'“ (-Oil,' 
2U5i') «*lfil32^->tii*5»IIIR 
tii't:*. fO«cD t fa 1 3 ^f: t Lfffl 
i' 4CD* 5 't of L i 7o 




fit, mi:fy/;i'7"D7"7 
4*. 4 L t 7 o 2CDX°n X"x Alt4e--r 5 t 3? 
-^#4 t" t fiPMtt 4 /2 * X'xrM t X 
CD x7°x 4 I't"-7 4’^CD4 4 4iEfflL-f C' 
4 to 4t, f'xr'M t x^Atlb-ttft'— 

A*ffe4 4 tt <"i:7V4 7 3- — tflilt 

</2'?i'„ 2CD 4 4®?I^?#t Jfi: BA 
SIC4*tt t>_hlf 4 t7"xr"4 ^xcDr"-7 

^cd 4 4f£5 2 t* ? -f& 4CDf'to :n 
f'x''—7 n|SCD7°n 7''x A 3?fll]|i&t 4 2 t * ? 
-f !■ 4 It 

®Hl_hCDS'4)fif-lt BG 7”w—>CD 0 #12 
18*'(xf i' 41„ 200 !t*V 390ft 4 f'* s ?f 
f-fciSfgLT l'4gfi^-f'to 2 CD7°n 7' 7 
A-fit* C.*V «6fSi H .®lf l' x 14V12 W* 
friffii'-tfaS, hmCD-9-S/2*14 X7 a-7U-? 
tt 4 to 

430ft 1UP$*V 4 >70—t->fto 2CD7” 



BG5rieo7;7-A@@ 


0/7 Af It-7 t X L t UlM-Hift 

L11' 4 to MSPOS lta;e-7'txt-y 

70CDX, Ytf&*Ht<Dr#&tlffi¥i* 
i^t'g^?f#®!l$t 4 2 4 0ft. 

g^CD^xo-f-Xtil^CD^-g, 470ft*> 
6.510ft, ft/2l#glt520ft*> 6> 560 

ft t 4‘o 11' 4 to 

570ft*‘6,690ft*%CD#®)7O-^> o ^ 
Selim + l* ? |®l®±l2i|lft 4 gjcO^&fto 
jROftiJt^tt tfttrita<4o 
t L 4 i' 4 t„ 700ft *> 6,760ft* 5 ' 5 14 xw 
770ft*V790ft* f St* 1«^^ft 
7 *C i A 4 a-9-t'to 

r BASICt -fe" k" t X *?* 14 4 t • ? j 11' 
7 J 0 ftt>t> 7 tcDt't* ? , BASICcDJUffliS 
ffilt,g.7 tit t'iS < * 1 4 -tt. 
^GOTOXl-leffl L-XXIz-^X r— M>I 
^tfflt4 t c' 7 fa I 1 4 *)cDt-i£%-^tlt' 
j®< 4 4CDt't* s , X-BASIC tl’5«* 
It C ^CD a >'*— h ^ffliHSlI? tfcflf 
t l X68000 @ ft* ? ^ t 4 -i ^ 321" x I Iftft 
t Info] 11 x -> > t£ CD X t * * 6 . ^ f l£ 4'ffl 
XltMfflfto 3 >''°4 7i^tftlil' < 6>-f 

6 i£ < t£ 4 ©t'*> 6. C ^ 3 >74- h -f ^ 4 

eta/?Ait*< -ssriiii'-rL 1 7 o 

m it 

^^x5-7 7 4 7KDffifflffiifaBL4 
Lt* f , VS±*>6,7-fx^a?fft7 i:lt7 
4 n>7 >tt>xf 7r4 7x£cD3i4)-£ 

7 y x7 L, 

*. BAT 

t C A 7 7 7 4 7C-^ £ At) L17 4 3 

ttm L, *®4 40Kf2&lt < t'Si'. 

Sf-Li'2 tltft*>*) 4tA* 5 ', IiL±01 7 
12 7 4 3 >y >rt 7xtW£S&:£'tftlf 
IA'H1*‘ 6,147"7V 7 ') x 7f/f x t-Klflg* 5 ' 
X% 4 t 7 12 1£ 0 4 to (4 ) !H|£—) 

X68000ffl3.A/\--77U I/O 7- K (CZ-6BU 
K39,800R) 4 7;2M7-; 

ft, 4M/\'< |-(7>})£?&RAM(CZ-6BE2:79,800 
R, CZ-6BE4:i38,000F5) 4 














U7.K2 yyyn/f-i* 


10 screen 1,3,1,1:console ,,0 
20 locate 0,10 

30 int 1im=3,gx = 55,gy=247,gb=0 

40 int mx,my,ml,mr,x(99),y(99),t,r,e,w,c 

50 char cl(255),ce(255):sp_pat(0,ce) 

60 r=0:for t=0 to 15:r=r+ce(t*t):next 
70 if r<>0 then { 

80 sp_def(0,cl) 

90 for t=32 to 95:sp_pat(t+96,cl) 

100 sp_def(t,cl):next:beep) 

110 bg_set(0,0,0):bg_fill(0,0) 

120 for t=0 to lim 

130 x(t)=rand() mod 496 

140 y(t)=16+(rand() mod 464) 

150 next 

160 for t=0 to lim+2 
170 sp_move(t,0,0,0) 

180 next 

190 mouse(2): mouse (4) 

200 for t=0 to 29 
210 mx=rand() mod 32 

220 my=(rand() mod 28)+2 

230 e =(rand() mod 3)+376 

240 bg_put(0,mx,my,e) 

250 bg_put(0,mx-t-32,my,e) 

260 next 
270 my=0 

280 for r=0 to 1 

290 for t=0 to 31 

300 e=376+(rand()mod 3) 

310 bg_put(0,t,0+r,e) 

320 bg_put(0,t+32,0+r,e) 

330 next 

340 for t=0 to 31 

350 e=376+(rand()mod 3) 

360 bg_put(0,t,31-r,e) 

370 bg_put(0,t+32,31-r,e) 

380 next 

390 next 

400 sp_off():sp_on(0,lim+3) 

410 ap_disp(1):bg_set(0,0,1) 

420 /*80 

H4 


430 while 1 

440 c=c+l:msstat(w,w,ml,mr) 

450 hm=(c mod 128)*4:bg_scroll(0,hm,0) 

460 w=l 

470 if gb=0 then { 

480 mspos(gx,gy) 

490 sp_move(0,gx,gy,65) 

500 8p_move(1,gx+16,gy,66) 

510 w=0) 

520 while w:w=0 

530 sp_move(0,gx,gy,95-gb) 

540 gb=gb-1 

550 if gb=0 then end 

560 endwhile 

570 for t=0 to lim 

580 sp_move(3+t,x(t),y(t),32+(c mod 5)) 

590 e=gx-x(t):w=gy-y(t) 

600 if abs(e)<16 and abs(w)<16 then mr=l 

610 x(t)=x(t)-16 

620 if x(t)<-15 then { 

630 x(t) =512 

640 y(t)=16+(rand() mod 464)) 

650 e=mx-x(t):w=my-y(t) 

660 if abs(e)<16 and aba(w)<16 then ( 

670 sp_move(3+t,x(t),y(t),72) 

680 x(t)=-16:mx=510 ) 

690 next 

700 w=l:if my=0 then { 

710 if ml then my=gy:mx=gx+16 else{ 

720 w-0)) 

730 while w:w=0 

740 mx=mx+16:if mx>511 then my=0 

750 sp_move(2,mx,my,77) 

760 endwhile 

770 if bg_get(0,j(gx)/16,(gy+8)/16) then mr=l 

780 if bg_get(0,j(gx-16)/16,(gy+8)/16) then mr=l 

790 if mr then if gb=0 then gb=11:sp_off(1) 

800 endwhile 

810 end 

820 func j(a) 

830 return!(a+32+hm) mod 1024) 

840 endfunc 


sp_init ( ) 

Sift 4'L 

ms * =? -f h mwmit* Lit 

M l ) M int 0 

ft# PCG/\’?->, 7^7^ hffl/N* Is v b ZrtWmt 

sp_set (charl, [inti], [int2], [int3] [, char2]) 


inti X&^(0~511 or 1023) 

int2 YM# (0-511 or 1023) 

MS (0or 1) □ 

MViM int 0 

ft# **□ -Ji'jMmnmmii, o &% 

512x512*- KTIi, K##1liftjFS 

bg_set (charl, [char2] [, char3]) 


Sift charl h## (0-127) 


inti a >(0-1023) 

int2 Ytf'>'> 3 >(0-1023) 

int3 &&/<*->□-K(V, H, COLOR, CODE) (0~&hfcff) 
char2 7^7 -f t l ) x Y (0—2) 

MS 7 770 1/yX^ (tf'>V3>, >U— K, AV7h7'0 7^, 

7 ^'jr^ t£t:) Lit 

M U -fit int 0 

ft# 3 >}$£. If Y is is a >!,£, (16, 16) ttZVL 

3&/\'?->=i- U x-t 


MSB 


LSB 


J 'i- 1 

K (0-127) 


h #•§•(!-15) 


00 i§& 

01 

10 ±T5fc 

11 


* U t- < u&<n£ n Lit 
Pri = 0 3. y-7 -f h L #1' 

= 1 BGJ:»J«*CI 

= 2 BGOi.yft^), BGUUHif 

= 3 BGJ: 

sp_stat (charl, char2) 

Sift charl 3 ^7 t h #-^(0-127) 

char2 L x — ? <7)il^(0~3) 

= 0 : Xtf '>'> 3 > 

= 1 : Ytf v v 3 > 

= 2 ; »*/<*->□- K(V, H, COLOR, CODE) 

= 3 I 7° 7 Y ^ 'J f -f 

MS xy7Y /\°^->n-K, * y h 7 'p 7 7 

7 < Ti- ij * < 4* £') 

HUtit int Lx —? 

bg_scroll (char, [inti] [, int2]) 

Sift char Ay * ?*7 7 > K##-(0~1) 


Sift charl a'7^^7-7> K#§(0~1) 

char2 x*3 h ^->#^(0-1) 

char3 ^ON(1)/OFF(0) 

MS a* 7 ^70> K<7)x* 3 h^-v#-§-flJ‘J^T f ON/OFF <7)|£ 

MU m int 0 

ft# 512X512*- KT'li, K#-#1ti^$n^V.' 

bg_stat (charl, char2) 

Sift charl /<7 ^ ^7 7 > K#-§-(0~1) 

char2 L x-? (0-3) 

= 0 : XH^ 

= 1 : mm 

= 2 : **3 >#-§- 

= 3 : fi^ON/OFF 

MS A , 7^7')>FI/vX7 (Jftft, x*3 h^-v#-5§-, ^ ON/OFF) <7) 
fft*iiJL*L£T 

MU (I int iTc^hHLx-^ 

bg_fill (char, int) 

Sift char 7 + 7 h >#-§-(0—1) 

int &3 S/n°?->u- K(V, H, COLOR, CODE) (0 — &hfcff) 

MS BGx*3 ^2 3lftT^&t$n/cf f -^Tft/r 

Lit 

M y f® int 0 

bg_put (charl, char2, char3, int) 

Sift charl t*c h >#^-(0— 1) 

char2 **7^ h XH^(0~63) 

char3 h Y/l^(0~63) 

int H£*^^->il-K(V, H, COLOR, CODE) (0—Ahfcff) 

MS BG* * 7. h <7)Ix$ L it 

I'M! int 0 

bg_get (charl, char2, char3) 

Sift charl -r * * h >##-(0 — 1) 

char2 * h XJ^ft(0~63) 

char3 * * ^ h Y H*I(0~63) 

MS BGt-*^ V (nVfifrttiL L it 

M U -ffi int IJc*- {±1 L 7*— 9 
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X-BASIC£l£?='y&y7)b-*y&hjZ 

USLSmUAGDT^. S££ltGDBASICS 

smK. x68OOOEBci/ui0:»i,* i &25a 


Mtzll(DBAS\C 


X-BASIC li, 4' < #W44M^TO 
LWi efts# 1:54315© 7 r 4 a/** Gtk o ii 
tf i 7 i:4oTi' , 4A#>, 
i:)£LT BASIC*© fe©®?MfS* J f>|?§ft0 
1 4 t1' 9 A & 4 frit A T i' 

t to 

fe^li, ffiWi&T'fF o A t7'>—f-7 li 
BASIC 4> BASIC 7° n /7A t liH®4 fc 
©tLtUi^n-Cfe^, CLEAR 
TBASIC©® 7 WMMeWm L T *• G> USR 
M&4 tTTi(is:4g7 1-Vx^l-c»f-Oih 
LT*4D, #4irliBASIC©£l>J-!I 7 
C««lg-t7->-^7 4^lrtL, BASIC© 
"FttBf—L i 9 4 tT\ 
^4'A* i -f-©^ 

BS;L47°n^7A©^tfC^? 4 t\ 1'f 
*ti:LT I) *'4 
& i tATL4» 

;ni:MLT, X-BASIC li&fjl^cM 
*&**x4Hft (54SI5TO) 6**7f G>* 
4 t>© t leiir i 9 t :4 777 °y ^©ifi-ffl 
AAn-ciii'it. 4©«^©fe*‘if-r, 
#^rrU'7'VM KaW: t 

&i:4, *ftG»fr«9 4«!>©$4l®Wft* , ffi 
jgLT, BASIC.CNF©ft>i:7 7 4 A^Sr 
l t fa < 4-ttT, * n i t© basic 

t4AG>I£<.'§H L £*;L4 4 t4<, frl 
i't8FngA-Hti:i£fflt4 4 t * ? T§i 4©T' 

to 

g4>t: t o-C^©4i'H»i#litt**' 
t»^j t) mt :a sft-rto X68ooo©*g-fr 
i:li«*fST'lM''M t©74 7;<*y Aff 
ATVit**, ^-p'<7ir©/f7t-7 
^xi‘C,t4t, 4ftT't>* , 4 D£t4t4 
* ? g>$9 4 t1:4 *>**ibtt. basic© 7 
y-i';n53 ok^m k c,(,>i-niftt 
4:t *»rs 4 ©T't* 5 , r 680004 A4> 
•d 64K'*M h 4 AT If i> lii'fc 

-ft:.j t*‘<.'<.'4* f G>, £&tc©&*i| 

»of:f§^4 tT'liy^y ©^JE5r®C 


5 : t * ? i iib ^ it. :©J:5 4*li^6, 
4 t iff sin 4 t'©(MtiXtiCMII®TO£ 
W 0 (It 4 t b'f * A If, t> <t o t L 4 7 
-**•!> 7fclT li t-fr 4 ^ (HI i 5 (if f&T t> 
4 4 fc»:4 D it. 

4 © J: 5 C g ftftt t> 48#fcti¥S, tt 
;£TT> 4©* 5 X-BASIC0*&41#fi4® 
T't* 5 , £$;&4* 5 G>{#li: i -dT- 7 — a.7^ 
Ctt^SBWftO^O^Uoi'TIii o4 < 
(ttftGixti'itA. 543BTO©fWli4 

t: 6 7-t-^v 7 M'9x4 £'ffi5gT>'° 
y a 7 L Ti.' 4 AA'tf ©ftfliT'li* 0 £ t 
A „ 4>T'ftT & 4 7, m 

©TOH^o T * ft 4 BASIC. CNF© (FT* 
TOt LTMiiLT^ttli*, g'&W-ffl©^ 

Afto 4BASIC* s ^(ict 4 Oft. '*7 
y-*©31 lull b SriiT't L, S£S ©4 
i 4 a 5 G> n®TOIi$«jtST'ta- G>, MS 
aWOffiS ix4* t liCPU©Hg*5f 7/n: 
tft: ta 5 T't= 4 4 1 1:4 0 i t (t> f» 
b A * © 4 tb i: li 68000 ©ftMiSt 7-t > 
7'7©SlK!i*' ; '£'^4©lii.'? iT'tiO J: 
tAL 4 ftZ ta-^-i:BB®cSn4-«S 
t®4LBi'HAi>? 




4 4 T'f> Jot &©4it> Cf&ftTi? < t, 
tftb BASIC© func ~ 
endfuncT'#i' 4RISC (rtSBMSc) t 4 A G, 
’Qtb*) it A (lit; t: i' L lf±fi a 7 ^ '°7) „ 
^BU5ftfi.'T, t y a©4JT'^l®(4’tBS L 
it. Tti 1 G>, BASICT'*i'T<.'4l-Jy® 

©nm-ct iiit©.*T'tii 4 6 ©^ 

7 -17 7*7Tti’4 li 9 * ? t oHtSt 
i'o4«t 9 4^-S-i:li, *©Mfirtflt 

OIF itUf, Ii**li4 C L 
4 ■£>-??«* 0 it A„ oil, TO £$*9 
fflij* 1 G>tixtJT, ZftbWtib (I'bWZ “-t 
t v-f-7" css) -r*^>9* ? ftia5(“« 

f-7” CfflS) Tt) A 9 i ^ 4 

< 4-E>®li4i.'<btfT'to 

li i li t't a ft H |i tj 4 L 4 1 ' 


*> r D M-SII^SC© li 9 * s itiit'ftT' b if i 
X 9 *’ G>, ^^4 U'9l&a©tHUi BA 
SIC TIt-oT, (■' L 4 b 7KS|S|y ; | 

ikf -defeat 4 11' 9 tjii^^Lii'f- 
fet:S5j$© “BASIC7 °b^ 7 Alt 4’ 5tib 
fl^t 4 4 i 6 n/fig-TL i 5. Z fti fCO 
BASIC fimtim-t f>v-t 7 4flfflt 4 
i: LT tSi:ieti7 K^7 5f#,^L4* s G> 

0 11' 9 r® LT'flo T 1'4©* ? , X- 
BASICT'li i ft? ft ^TOtLT^Bij-Sf # 
It 4 4 t Tf o t isjfy h 14, i i) 
Cfijfflt 4 4 L tffZ 4 i 9 t: 4 7 4©f 

to 

4 ©i 9 t: X-BASIC 4 G»T'li©?®* 4 
asr* 4 4©T't % i: t> ftli 

fx4 i 9 IlIf^T'iS#? ft 4 — a. 7 71/T" 

liPS:©^0S'i:'9i,'Tlii o4 ( ttfui 
tiTi'itAL, i 47-t—7°*»G>&M5 
fL4K5F46 J P J P6*-*) i: < i '6 ©T'L4 0 
tU ?-©»44£4i> 5 'G,§14fei.TLi;<. 
40 t *) T’to r i*,fe«UA,i s tb4 
H£BH* : 4AT 4 A 4 i> ©*‘ 6 L n4t.'lf t', 
?ni: LT I) C*ei'*&#*.'4*jo 

L*‘L, 4 Zffo Liot lit 

o *><© X-BASIC * f , UT r ®gj t: 
tti'T & 47-t77' 7 ^ 9 >ti>H o4i' 
4<i'. #i4cU'6©4@©fIi:it*'nTi»’ 
*tlf5r < oTi'4 i 9 4 t®rt. *‘< 
LTPX^^tL4a.7 -©®i:ttf L too 
& HI L 4454 i 9 ^ < S»T'& i L 4„ b 
*>oT L i i!JT5 LTSIU'4 t 5ri'oT 
i'4b(fTli4 <, i4*ft4*n:J:<# 
L G> A4l#jt t 4 o T i' 4 ©ft. 

I “ ” “ “l 

I I 

Xyrt'JlsctFNC 7rf)ls 

!_ ___ ! 

^5Smi i:X-BASIC®^ L 4 t & r .X 
CDitiM? * ? #i’ T i' 4 j t *-V 4©T't* f , 
SJ-no-’' 5 '—Ji a 7T li r .FNCji:4 0 i L4 0 
coli, X 7 7 4 7i/ 6 FNC 7 7 4 t 7 -t 
>7>^ y 77 ©^ o ^riii o4 < |b] c4 
©T't X 7 7 4 7i/* { £ ft § fcfgftBj 
^4©CWLT, FNC7 7 4 7t/|i£> < iT 
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BASIC** $ ft Till < 4 t", £'>14 

t&* f ji4s©T'c i fcofccD-ri <t ?o 
* 05 , 7-fc >7*9/It 
L 47°n 7" 9 A li 4 fag^T^IS L T (.' i 

ifi<, ^©fc&y v**aiTflm*: 

7r / ( ^Uli^lf7 Kw7i ! |i.T* o T 
(l^t-tifSE l 4 It fa (if text -tt^a XD'fc. 
§1), 7°n 7" 9 A It i Z *' X £ — M~ 4 J: 
5i:loTi^t. t C A* f BASIC©t4® 
Ctio077t 'Urtt-fco© 
HUS L a>*it4t' 11' 7 ©fii, HH$c©$: 
4417 7 4 Li 7 4 H't' 

At'A t'Poi-i'Tt. 

£ ;T, t> L oct)7 7 4 ^©^l-t'< o 
I,©«4£ilLTfa< i a ! THl7 
4SHUl**# x. c. fa 4 L 4„ 7 r 4 xkD > © 
S-BWciiHt 6 «**£''* A: 9-7> (-, 
7*") 4/t 9, c fa47°n 7’7A®tli: 
11' T fa < 11' 7 LtTffiT'T o BASIC li ^ 7 
7"4#!!« iximtornnr K t 

HI-A *®WSK©'Vi/'?®0!>«6 


Ts^'°7 4 —£4 t'4fti 9, Jfaci'jt 

lit L 4 It fa If 4 >5 41' ; t t, text -t 7 -7 
g VIUt1-liffii4t'C. fcfcfifcltlf, li*‘ti 
iiS©^ff 7 7 4 'KAfl^iic t £ fafi £ 

4 t Z Ali* 0 4rA 0 ifiut'ilf, It® 

7 TC* S 0fto 


a iv djplMDtMis 


k fa-riitt®M®c©^ 7 r®©*it * a 
ti'H L t to Ell far—7V©4i# t 
l»tt**i'T&4 LA:. AiotlftLt'*- 
{> L fair A* 5 , 12 41,4 * ? Mil: it i'*' 
ItTAi Lit. 

ttsl* ■ b Hi CllflS|©7 hVxi'fi'tib 
tlit. filU*'^ 6 fffS iT'li*iTt'7 
iT'L 4t'-TL l to X-BASIC liefjB#, 
RUN, END, SYSTEM4 £ © 
Ut7V05faLtl, ^fSiJ 4 C. i * ? 


XCOZ 14#4, % it£"fa 
©&14i-*S L TI^It T 5t7’fl'-fv©S 
^* ! 'T'nt tCLti'S©T't o 4 t x. 
14, ^Hlfto 4T 77>7°n 7"9 AT'li 4 
®it 4t*fl4i'E'W4t'©r', C fa A * 5 tn 
LTt'55fclAl'£4 *)rtsC4oTt'T, 4 
i: tr-ft: it 9 — y-\ h l t i:4oTi' i 
To 

7, 8 # @ li#Tctil x. 4Tffiiffl©fitii 
T'To *a4liffiffl$faTi'irA©t'4i: 
4-S-i'Tfat-T *) irA 

* f , ltt0SW±4- # i T >I* *> rts^T* ; 
flA'T* £ 7 K w x %■ AfaTfat'4li 7 * s 
it-Tli t. 

9 #@ li mtk.0)% m 4 %.m L 4 r-741/ 
<D*M7 KvxSrWLit. TO&r—7' 
xi'T'Ii, £ fa£'fa©M$c£©$A t: 0 4ti¬ 
lt, &'©HSc&t©Kt?JO<:iTt'it„ 
f—7'A'©fk»tts&co«r*Si-r. o 

i •}, W&&T-7’frO)1&b D i:(A0* ! 2 
ofcT tt-fto BASIC*' C. 


*• 0 4 t & i:4A *'©^114 L Tfa < ■& 

01-B IVy^-SiWOPm 


< >7 * * -'> 3 >T-7 )ls 



\Z"j h 

* * 

15 

i : urn o : §|#& 

14— 8 


7 

l i^b&fTbI 

6, 5 

0 0 -> **&£& 


0 1 — 1 ^7ci£5lJ 


1 0 — 2 ^5cE5« 


1 1 -> #^tcSS5IJ 

4 

i : /-fv-r >?, o :m 

3 

1 : str 

2 

1 I int 

1 

1 I char 

0 

1 : float 


<3I£&> 

$0001 float val float® »fil 

$0002 int val intMIBtfifi 

$0004 char val charMiKdiE 

$0008 str val 

$0011 float vp float^<7);JW > ? 

$0012 int. vp intM^^^T-'— 9 >? 

$0014 char vp charMSi^^T-'— 9 ^ 

$0018 str vp 

$0081 float omt ^'H§1iT8ittfloatM$MiS 

$0082 int omt 

$0084 char omt ^BgfaT^^charSi^fl 

$0088 srt omt 

<m 


$8001 

$8002 


float ret floatMfitfifi 
int ret intMiBtfiS 

(charMfiM‘mt LT(J^^4’L') 
$8008 str ret 3 C^IJ 

$FFFF void ret 
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ait t sc it 4 fC'&muzzmim? 4 

lfi#4£S;t 4 7z*0 t0-f't*' ; , 7> i o 
t»£U'0lt4ft* ? fttftClt''°x;<-* 
0£*t* f 0 4 ©fit 4 <, r &TO0''°xX 
-^0$ilti57 K'^xS-afe^tzf- 
7>* f <b 4 j ti'5:tft. CwlSJlLc 
t'7t, 10#Blt r '’ { 7^-^0f-7V 
fciittf 4 v*E?'l^0t>4 I7*j tt'7 
:Mtj:tiit. oi 0, 4tt*tltftc 
ti'TS47 K^x*' ; |y7j0TO0''°x7< 
-*fc£ltlt;&4 t 4 Afc^l, fit*. 
+ 4 c*t,'T*4 7 K^xliftoTO©''' 
x s-f'&x.mi'Cfri t:5^Ui' 

* or to 

m 1 <Dm-C'lZ 1 1, 10#B It PTR_PA 
RAM&Jn Lti’it. PTR_PARAM O 
t 4 ACIt3H^C''°x7-;*3r£ilt 4 r 
- 7 > *»t 7 K w x **, TO « 4 & £ l 
ttlC&A-r'te *>, JMult G_REV_PAR 
AM, &liPEEK_PARAM kttiZtift 
LTl'ito £ l TG_REV_PARAM, 
PEEK_PARAM© t 4 AC B W©^'"7 X 
-^tir-7>i^4 0T'to 

:0i p i:777^7a < t1' 7 O 

lt-JE.t IU'4 4 t©t 5 t:M-iL -S **«» L 
L'olt40li7 * ? 77-t xt 
5 fflij, o i i) BASICt: t o T 
40ft„ '' o x7-*0ScltTOc i^T 
M4 0 4ta‘ii, ^7^-*0£#fct£> 
t^t&^fk, t'ca't^'t'OTOo/.: 
*OI>O*‘I,ott50t:^Bij* ? *>*'i) it. 
j0,s, :©i5u«7>'*?s'H>*itur. 
W Sc * 4 1,o 11 x fpf # B O lid Sc *■■ r 6 *■•■o 
7z£, £ft£4fgLt (7Fvxli4>q 
MT*^§nit) PTR_PARAMCJ£1, 

* 4 i:ti>-c*47 K w-x 5ri#o t < 4 7/ 

ttrttfort. 

3 ?Pg 0 TO 0 ''°x 7 - * 0 SltOI l> ico 
liici-tf, *fcltH»0*Ott«fjRtt© 
i:4-9ti'it. OITOtTOOJUMil© 
EJS'JIt, 7: t iLUrSISSck l T charS £ it 
L, M *J tit. t ItintSSSrt 4 t 7 4 tOf 
It, HfT) C$0004 (char S0OI » Scf* 4 
:l^t) **, C$8002 (int^OM 1 ) 

fit-fib 4:t 4^t) * ! Hto S') fit 4 

^tii^$8000Bl±, 011 ISc0*D£-lt$OlOO 

*'«rt7)>G, OITO0&4B)IftL4 < f 
t |DSija { o tt li ft 4 ©ft, 
ll#BliTOO^ffT IVx^7:t 
—7Vo3feai7 K^x^ipi i to M^'4 
«#ltTO€4£ltL7z)iBc4 Ht. i 
1 O^if’ ltg_revO 7° o X"? AtdtltGRA 
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PHIC_REVERSE tt' 7 X'-Ow© U4 
Ti-tifei*), |5]f*CpeekltMEMORY_R 
EAD*-t,Wii 4 0ft. 


3m&<DgVMX0<tmG)iBUft 


^x*'4jEI U^oftettIf BASIC *• 
f.^S©TO* t »fc;ttit4 X 7 c4 •) it. 
^ tL-r'it, 7zti.lt' 

data = peek (1 ,&HC00000) 

4 £ t L 7z t £, 1 'P&HCOOOOO 1 t' o 7z 
«"7 7 - 4? It t' O t 7 C L f BASIC*' t> a 
Wt^-t>C0l|iiS§n4Of L t 7 7>\ 
4 7z, peeklTOOM 0 fit (data C ft A £ 4i 
4fit) Itt'Ot 7 C LTiR-tltt I'O-fL 
i 7 **. CfTOHf A mttli: 
PUSS t 4 4, 4fiiL0*C-7i.'Tf^'CA 
4 L t 7 o 

RftWtfW S ft7z t § © X * 7 70« 
?Jltl3 2 0t 7 C4 0 it. X?7?0p 
AltAi: (A7 = SP0int7 fVx) t: it lift 
(>TtO7 K x (^f$© 4 t 4Tr 4 4 

I'), £ ©&' (A7 +4) C01 £> S0iTO* J 2 
'*4 I'**), 

t„ 01 TOIttttoi&fz 010^4 hf*. fft 
i/14 MM/?l4BASIC7“n 7 x u -fO I £ Sic5? 
*<HIF|-C'to 7zti.lt, 
jj (zillion, nicol, bigi) 

ttmt, (A7 + 6) CltzillionOfit, (A7 
+ 16) C ItnicolOfit, (A7 + 26) C It bigi 

0fit* f Aof to 

stzzf, otoc r fiij tt'-ott 

?-/'li) f char (l-'^M h ) int ( 4 

^'4 h) ffl/j:©**, ?nt f>float (i?lfjt 
&*) S7t0*> t t'o7z, SOJii'C to 
tfilOA 0 7jltH4:o t § i to 
C a >^°4 x U f f It char int SCte 

Sit 4 lt*'ltli t/vt:nt I'O 7zfi[ILT.It 
■tt, ^0i i x^-7 7C«A±lff t'i: 
tO-f', TOflintOI &&05l!t>)tl4 4 t 
It-T'^t-tfAo 407z*, 7zti.ltOI&a 
t L TintS! 3? If JR L11' 4 t 4 A C float 
S©ffi?f» LTt "fltn/zTOlt k-A,t£ 4 
t Itt' O $ I'M^n-tt, i?®Jd'Sc*0r"- 
*$?*©** intS0r"-i? t L tfsKffl L X 
Li 7 4 tC4‘S it. C It 7° n X'' x •x 0 
*ff-r'TC Ar t r & 4 074* 0 tfst't *' it, 
“ d' $ & Wt 10111' O $ I.' ^ li 4-1.' 

0* s ®511' 7 f)04©f4 0t 7 C 4 4 0 
f L 1 7 O 

4ixcWL, X-BASICIt BASIC t ^14 
St4 7/itcsta f c* 4 tt'^a^-C'it 
OOt-tAo g-lO^i'4 Mt, 5tsi02^<'4 
h*?^|j(0S4^t7z*C, 8 '*'4 h 


(64f'-7 t)* f fit4^tfit4 0cfsE14($ilii 
to 4 07z*. t'A4S0flt* i '< til'hi)' 
k> 41't 7 47§^-f' (), Ttsiio 2 ^1'4 t 4 
fWrt 4 4 t rs S0 8/1'4 H: if01 7 
4 7 * —X x I' t'fitinAo T t' 4 ©TnSrfiJ 
if L 4 * 5 'G fsE 7 4 t* s t'|i 4 t 7 C4 0 i 

to 

to t i, S1-o|ilSj&07#n'C It bj'h?' 
^ x yro I & D fj[0S L T i■' 

4 4 t ** <c. t ib*’ 4 t 7 C, MOflltB 
ASIC* ? «I7 ^fo 7 < nttoSL'**it5«£ 
Clt, "TSE4 liJIScS^ait' Lf < tii 
tl, rii 4t'4 (. 17-7 x-t-j7?r/ti 
Ltitiot Li I'HfllSTOlti'ft/mf ft 
t-fW L 4t' t 7 4M0OI l> <& 
*><44tlt^> l )ttAo iiGTJ'Cib'^i. 
C. n 4 '•>” x 4 — & 4 Oft *• 

P4 tort. 

* tW«40ltMft**t©*f>2f ttt© 

jSUSfrti*. TOOMDfitltttto L*> 

* 0 i tf A0-T¥M4 t 0-t'to 4 t, n 

iC^IE^C^TLtz^t'b**?? BASIC 4 
>47 7°!) i?C-:fl]itt4 72#CD04f£i,'ito 
J(!ifl* ! 'IESc»7 L7z GDOCO^Aiitte 
§ 4 to 01 & »0fil* f )ti^fitC 4 o f t' 4 
I'4t TOfUiJt'i x-tfl^L 7z C It 

DOCOEWOfiifcAft, AlCJ-x-/ x-fe 
— ^'0X^9iJ (r^^ilOl^ib 0 It 0 -fSt) 
0*4 7 FVx^AhT SSf-XLito 
B ASICfPJl f It DO C 0L4 ?(- 0 fifi.* ' A -o t c 4 
U 7-7 x-t — - 7 ' 4 ft7 j L t£4'®f 
122 M^TfllfU : ttlSnizt^©A5’'7f' 



0 floats 

1 intM 

2 charfiC 

(7)ST^W _h 

t3 7W h H(i OtfAS) 

3 strM 
$FFFF 



















l i to 

& t IS! C <10 

/q |'0i!)T4 1 fo-CMUt. c© 
x. J/ 7 ©it Si 7 Kvxj AO r.AtlX !) 7 
-7tnu', BASiaM-r'-SttiRo-r t t> t 
i -To IE4JIS A- i i Iffiffim 

I: bOlttft&t&blt-C’, ZCDLZti 
AO (i&tfl $ ft £ t *> l Wi 4 /if i *■ i t' 
i-t/v. 




4 4-«< L < L i 7 
A»<.'T*i L A* 5 , 

Wil&k., Ztxi-C'WX ?4BASIC**C. 
3— xt/t 4A'tt©1tMI§-t7'xi/—f-7 tit 
i', t'Ai'AA&f'N'tti'T %Xbi)' *) I: 
<i't©t'1' 0 4i:i , t>/z»'7 , D77i 
* ? 4j«Ali7 **ih-*' 4, 11' 5 C. tf, 
tio tflEIU 5ttMft4te-»T** LA 
(Mm 

7 "7 7 4 7 7®® (512X512 K 7 F -t — 
F") ©feJxiz^ff 5 g_rev( ), £trS$K4Fr 
7g_inv( ), IOCS^—^1-J: SjMj®^—K 
©fll t> #5 x. 4* fir 5 g_mode(n), !/©l*l 
^ 4!%<&■ ill 1 " peek (size, adrs), 7 -t !) ^ © 
IF & ii©- 4 Ft 7 poke (size, adrs, data) © 5 

o-C'-fo 

peek, poke©®!® W-’' 1 ’9 7 — 7 li 7 7 -t 

x-»M X”4I;nfcL, Ot'/’M F7 7-tx, 

1 T'7 — F"7 7-fcX, 2 f'n 77"7- F"7 
7 -fc X i: 4 I it. 8086CPU 4 f>'M F 7 
7-fc X i V- F'7 7-fc X L* 1 # 0 itA*> 
£>, pokeb, pokew ©i7<-77-fcx-t/( 
fc-t C*iJ«OKa?fffliSL-Cfc ii'O-tT 


7 7-fc X* s )j|lb 0 i to peek, pokeA'Itf 
6-7 t fc-9‘>7*A'7*n 7*9 A** 

^7 77:t tti:4 H iAh-i; t tS 
ot, o-toci ti*-c?i»-tr'7 7-fcx-t 
d x"4Jg£t 6 i 7 c L T* i L A. 

g_mode( HiBS-t — K Ex xe © IOCS 3 — 
*4*©* *«RJLi LA. '*9 7-7© 
fi©ti 7 7li L ft- HAOf, IOCS3 
-zi/-Ki;4i'(it-C'l £©i i IOCS 4"f 
O'tbLito C©fctiB@* ? i: 5 4 4*-li 
ffill5 n -Cl' i -tA* s , IOCS©5tit4it 
it'(tT*A(., 41-**L *-*!*©h ZWl 
^tii|^UMi43-7t> 7"-t' 
LA («i4*>t'7*'li»'lALi:)o 
$ T, C n C, 4 BASIC© t L T 

^iiLT^iLi7. 7 — X7 7'f'«'£li 
usrfnc. s t L T £>' i t. Cl ii 4 7 -fc 7 7' 
zi', !) 7 7 L i t (include7 7 A P> 

*‘C«)ffli® L-Ctet'-C < A'$t'„ Cfxliit 
n%i ioA<isiL’ (.©-ct). 

as b I usrfnc 

lk b i usrfnc —0 usrfnc. fnc 
tt © * f o A 7 7 7 xi/, usrfnc. fnc 4 7 X 
tAx"/(X7 (L IbAAt-o tf-ofi-S 

3 t°- L A {> ©) ©BASICr"/f u- 7 F !) © 
Tt: 3 t.°— Lit. 

copy b : usrfnc. fnc a : ¥basic 

4 L X if 7 7 4 t” 'CBASIC. CNF© 7 7 
/fx7©t!-, FUNC = usrfnc © 1 Ft 4 it#P 
Lit. 

§ *BASIC4i&»L i L i 7 . 5 o©ffr 
L 1 - M&* f iifln $ ti ABASICOtT & * * ? 1 
T"to IS L dg_rev( )tg_inv( ), g_mode 
(n) 4I£oA7"9 7/f 7 77°n7'9A4f^ 
oTC4i L A©Tl£L-C*T < A$t' (t 

>7° xi/1 )„ 


TfV'trCD's y&2/x%ls—* 


v)m 4 it s is#© tr, v is 1 ffiPi < $ 
i'©i^7y©(«ft. X-BASIC ©Jt 
gfililiSc©^ 7 7" I i B A SIC © & ilUj 111, RU 
N, END, SYSTEM4H'©*lT^i:I)*fi- 
$n47°o7'7A44tSt'|i S4t', 4** 

4**^-7Utt5Dt 7 4jf®4LTi-6 

©ft**, t ifiA'tl i: if > L T 4 L 4 
ttnti'4f.4t-c t**£< 4 0, hxoi 
L A7”n 7'9 z. 4 $t«|5|?S& t L TL A 
t-11-7 i 7 4^-S-UttJ: lti'4w t t< 
mm 4^$-tc,n-ct'4 <t 5 ^ 11 -: 

t w©_t# 0 itAo 
&S#, it(i t ©t7 7°xu7°n 7'7 A 4 
tfi'Ti'-r, -N-M'CfWADfU?' 1 ) 
LTLIi'l LA, fcDTr- 7'>©04 
7 KwxA'If* k-r^H 
15 fi® t: 4 O -a- nijft-O t fffif-4© C. 
t-xw K'©®t')ffii:Bi L 7 AVT-62©7/f 9 
7 > F 4tttb-a'-CsMi:i?* > AA'©** r ffi 
f!l 4 (I s ® li 3 > k” i— 71: xp c, -t T L i l j 
ti'if to 37 *t — 7 — © r 7"7"xi/'x' 

■y->3f)Lx2 x\^2xxtL/-Ki5!) 

A) 5gj67 7"f2P 

func_te8t ( i;int, j ;char);float 
func_te8t1() 
func_test2(i) 


B) A)4t.fcCfFffiLfc/^-y7'7 7"fxu 


.include osmac 

. inc 


.include iocsmac.inc 


. text 

dc.l 

X INZ 


dc.l 

X RUN 


dc. 1 

X END 


dc.l 

X SYSTEM 


dc.l 

X BRK 


dc.l 

X_CTRL_D 


dc.l 

X_RETADRS1 


dc.l 

X RETADRS2 


dc.l 

PTR TOKEN 


dc. 1 

PTR_PARAM 


dc.l 

PTR EXEC 


dc.l 

0,0,0,0,0 


PTR_TOKEN: 

dc. b 

'func_test’ 

, EOS 

dc. b 

’func_teat1 

’ , EOS 

dc. b 

’func test2 

’ ,EOS 

dc.b 

EOS 


PTR_PARAM: 

dc.l 

func_test_param 

dc.l 

func_teat1_ 

param 

dc.l 

func test2 

param 

func_test_param: 

dc. w 

Z INT VAL 


dc. w 

Z CHAR VAL 


dc. w 

Z FLOAT RET 


func_teatl_param: 

dc. w 

Z VOID RET 


func_test2_param: 

dc. w 

Z INT VAL 


dc. w 

Z VOID RET 


PTR_EXEC: 

dc.l 

func_te8t 


dc.l 

func_te8t1 


dc.l 

func te8t2 


X INZ: 

X RUN: 

X END: 

X SYSTEM: 

X_BRK: 

X CTRL D: 

X RETADRS1: 

X RETADRS2: 

PTR TOKEN: 

PTR PARAM: 

PTR_EXEC: 

rts 


L i 7 * f , 680007”li C fit: P 77"7— K® 

usrfnc«®7)6l5y 


1000 /* -User Function Sample Program-*/ 

1010 screen 1,3,1,1 

1020 gmode(&H10C):wipe():console 0,31,0 

1030 int i , j,k,1 

1040 for 1=1 to 4 

1050 for k=0 to 10 

1060 for j=0 to 12 

1070 for i=0 to 23 

1080 circle(k*l*10 + 50,j*35 + 40,i,hsv(j*10 + k,31,31-i) ) 

1090 next 

1100 next 

1110 next 

1120 user() 

1130 next 
1140 end 

1150 /*-.-*/ 

1160 func user() 

1170 g_inv():delay() 

1180 g_inv():delay() 

1190 g_inv():delay() 

1200 g_rev():delay() 

1210 endfunc 

1220 /* -*/ 

1230 func delay() 

1240 int i 

1250 for i=0 to 5000:next 

1260 endfunc 
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U7.M-A osmac.incV-3.U3.l- 


-xj £ £ tc*-*r-K4Hfl£, f^-c 
A A cd * f & ft (t x r ^ ? 7' V*. t ix—7 a<, 
Isy&co^iBii £ *JI & Sc, SI fit CDS? A £ 3r^ 
o 5 CDBASICX<Dfunc.SCCD i 7 ClB'Xfc 
It If, £ ft 4 ## t: LT^7 7" 4 flsfjR L X 
< nz>y°a 2"y is -ct (y x h 2 )„ 
it', M*«A£4#iitU:7 7xf»'«r 

f1=-o Xfc |s i t<, 7T4 Iftest. nam® 
f ? C&3S^ 4 r .namj i:LT< A'S i'„ 

4 CDflX 

sampled ; int, j; char) ; int 

non (no ; str, an) 

£ 1 ' 7 i 7 C, BASICcDfunc£CDf£A(: < 

4 f 7 4r^t'imft©«Bu«r*i.'TteS i t< 
$Sc©£iiiili!i*IS fti tOXAAX t *> 
ii'itAo $!SccD£!4 ; iii«&LA**-&i:if 
(nonCDantDf 7 C) int SfiiS £ tlUrS 
ftit„ BS*ltgfr0S?4f+ttftlf4©S?* f 
mtu $ ft, *»&tftif h t fit A i 
(C-fV 7 voids?) Xt, 

ix — 

*‘Lito ®tli:7 7 xf A'£4 NJi.'X & i 
tcDX r .namj 4 JRo A t H'J (test, namA 
® test) 4 At) L X < A'S I'.tSt, /o 
/do V't — 7*'“ thX, xv^?"4f^= •) 
Wi* i to ftXiii L A’xv y 2*0) 7 7 A > 0 & If 
ffcli £©7 7 xf 4 r .incj i: L 




X-BASIC ©JMMW:4*R«:f1soX* 
it, ibftiXtr 4 4ft{>XSi 5, £ £ A 

£ A fir 1(.'»»*»£ i ftX S i to MSc* ? 

HI i 4 £ ic ?fi!>, it 7 £#rL fttttff 

t7>-t> A&fjiixi> 4 £ t' 7 #4 t t 

i<L i 7o to £«t:#x.ftlf, t<: 
xv * 7" 4 ft It Tjiimcrts^t4ttrt 4 i 
7 t: LX felt If, Ai,«P4 7’D/7 a 4 B 
ASlca-iifWct&x. 4 ti>): £ ft, 
2*y x'V t x 4 n — K L XHfrt 4 ftoB 
TO4f^0, Xrtst 4 f 7 I- 

L X felt If, BASICX 

1000 gradius( ) 

£ i' 7 t 7 Ctf < £ f 5tt 9 x* f iiio t, 
£31!^ f> ft4 £>Jf o X < 4 t 7 i: t Xt 4 
®Xto oil), gradiusl )lf r X'—-£>4^ 
otf»7l A’ M§o X < 4 j HSc £ t' 7 b 
ItXt (x 3 7 4 IISSc 0 fit £ L XiSt A ^ 
l¥i L I' X"t fa ) 0 

H 4 A, lii40itfiliU mamm^o)y° 
b/7axi, i'1'bitx', x^awiic^-n 
/7 a 4 AnxitO'/ht £, 4 04 , #4M 
AX'^fft 4 A 0 3 ^t 4 A *> L X 
So X < 4, A £ f If fortran( ) f apl( ), 
lisp( ), prologl ) A AX i '7 PSc4f^o X 
tOoC 7 l-*‘ i ft A C'CDX t„ f) 4 IHfit 


Definishion file 


.nlist 

* 

*. OS system call 


_EXIT 

_GETCHAR 

_PUTCHAR 

_COMINP 

_COMOUT 

_PRNOUT 

_INPOUT 

_INKEY 

_GETC 

_PRINT 

_GETS 

_KEYSNS 

_KFLUSH 

_FFLUSH 

_CHGDRV 

_DRVCTRL 

_CONSNS 

_PRNSNS 

_CINSNS 

_C0UTSNS 

_CURDRV 

_GETSS 

_SUPER 

_FNKKEY 

_KNJCTRL 

_CONCRTRL 

_KEYCTRL 


* BASIC cons' 

* 

Z_FLOAT_VAL 

Z_INT_VAL 

Z_CHAR_VAL 

Z_STR_VAL 

Z FLOAT_VP 

Z_INT_VP 

Z_CHAR_VP 

Z_STR_VP 

Z_FLOAT_OMT 

Z_INT_OMT 

Z_CHAR_OMT 

Z_STR_OMT 

Z_ARY1_FIC 

Z_ARYA_C 

Z_FLOAT_RET 

Z_INT_RET 

Z_STR_RET 

Z_VOID_RET 


equ $ff0O 

equ SffOl 

equ $ f f02 

equ $ f f03 

equ $ f f04 

equ $ff05 

equ $ f f06 

equ $ff07 

equ $ f f08 

equ $ff09 

equ $ff0a 

equ $ f f0b 

equ Sff0c 

equ SffOd 

equ $f f0e 

equ $ff0f 

equ $ff10 

equ Sffll 

equ $ f f 1 2 

equ $ffl3 

equ $ffl9 

equ $ffla 

equ $ff20 

equ $ff21 

equ $ff22 

equ $ f f23 

equ $ff24 


equ 10001 
equ $0002 
equ $0004 
equ $0008 
equ $0011 
equ $0012 
equ $0014 
equ $0018 
equ $0081 
equ $0082 
equ $0084 
equ $0088 
equ $0037 
equ $0034 
equ $8000 
equ $8001 
equ $8003 
equ $ffff 


* . System constants . 

* 

VRAM equ $c00000 


A f> 0 ) (test A “o test, inc) Uiotoit, 
f) £ li 4 ©xv y 2 * 4 include 7 7 A ^ £ L X 
JftDStf**. a r't tXU7 >cd ft-oA7°n 
t'7i £ < o O It 4 t 7 Ctftlfto £ffi 


0) A tXtit: if- c> lit: MIS 4 BASIC* • c, if 

tiTit 1 7 u l x 4 fteft©*»©»*# 
rf- 4 t.*‘t, t7't > 27 °y 2 £ t'o a t 
7 A # 4 ~H t TBf eotfioHAi'? i 


I 7 o 


£ * f XI 1 4XL 


1 00000000 

2 00000000 

3 00000000 

4 00000000 

5 00000000 

6 00000000 
6 00000000 
6 00000000 
6 00000000 
6 00000000 

7 00000000 

8 00000000 
9 00000000 

10 00000004 
I I 00000008 

12 O0OO000C 

13 00000010 

14 00000014 

15 00000018 

16 00000010 

17 00000020 

18 00000024 

19 00000028 

20 OOO0002C 


(01 ) 0000009C 
(01) 00O0009C 
(01)000OOO9C 
(01)O00O0O9C 
(01100000090 
(01 ) 0000009C 
(01100000090 
(01>00000090 
(01100000040 
(01)OO00O05E 
(01 ) 


5 t: r A AX t X & % ? 7 71 7 2 7 — j 
CD CDBASICj Xtfao 

U7.M-B usrfnc7 5 tzV7)L/U7.h 


zy?)\ 


er Function sample pretfr 


dc.l 

X INZ 

dc.l 

X RUN 

dc.l 

X END 

dc. 1 

X SYSTEM 

dc. 1 

X BRK 

dc.l 

X CTRL D 

dc.l 

X RETADRS 

dc. 1 

X RETADRS 

dc.l 

PTR TOKEN 

dc.l 

PTR PARAM 

dc. 1 

PTR EXEC 

dc. 1 

0,0,0,0,0 


spare 

spare 


* . Generali constants.. 

* 

READY equ 0 

ERROR equ 1 

CR equ $0d 

LF equ $0a 

EOS equ 0 

. list 


21 00000040 

22 00000040 

23 00000040 675F72657600 

24 00000046 675F696E7600 

25 0000004C 675F6D6F646 500 

26 00000053 7O65656B0O 

27 00000058 7O6F6B650O 

28 0000005D 00 

29 000O005E 

30 0000005E (01)00000072 

31 00000062 (01)00000074 

32 00000066 (01)00000076 

33 0000006A (01)0000007A 


PTR_TOKEN 


PTR_PARAM 


.. Function name table. 

dc.b 'grev',EOS 

dc.b ’g_inv',EOS 

dc.b 'g_mode’,EOS 

dc.b ’peek’,EOS 

dc.b ’poke’,EOS 

dc. b EOS 

Function Parameters table . 

dc.I G_REV_PARAM 

dc.l G_INV_PARAM 

dc.l G_MODE_PARAM 

dc.l PEEK_PARAM 
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34 

0000006K 

(01>00000080 


dc. 1 

POKE_PARAM 



35 

00000072 







36 

00000072 

FFFF 

G REV PARAM 

dc. w 

Z VOID RET 

* 

g_rev() 

37 

00000074 

FFFF 

G INV PARAM 

dc. w 

Z VOID RET 

* 

g_inv() 

38 

00000076 

0002 

G MODE PARAM 

dc. w 

Z INT VAL 

* 

g_mode(n) 

39 

00000078 

FFFF 


dc. w 

Z VOID RET 



40 

0000007 A 

0002 

PEEK PARAM 

dc. w 

Z I NT VAL 

* 

peek(size,adrs) 

4 1 

0000007C 

0002 


dc. w 

Z INT VAL 



42 

000000 7K 

8001 


dc. w 

Z INT RET 



43 

00000080 

0002 

POKE PARAM 

dc. w 

Z INT VAL 

* 

poke(size,adrs,data) 

44 

00000082 

0002 


dc. w 

Z INT VAL 



4 5 

00000084 

0002 


dc. w 

Z_INT_VAL 



46 

00000086 

FFFF 


dc. w 

Z_VOII) RET 



47 

00000088 



table . 



48 

00000088 

(01)000OO09E 

PTR EXEC 

dc. 1 

GRAPHIC REVERSE 



49 

0000008C 

(01 ) 000000C6 


dc.l 

GRAPHIC INVERT 



50 

00000090 

(01 ) 000O00FE 


dc. 1 

GRAPHIC MODE 



51 

00000094 

(01>00000110 


dc.l 

MEMORY READ 



52 

00000098 

(01>00000154 


dc. 1 

MEMORY WRITE 



53 

00000091’ 







54 

00OO009C 


X 1NZ: 





55 

0000009C 


X RUN: 





56 

0000009C 


X END: 





57 

000O009C 


X SYSTEM: 





58 

0000009C 


X BRK: 





59 

00O0009C 


X CTRL D: 





60 

00O0009C 

4E7 5 

X RETADRS 

rta 




61 

0OO0009E 





62 

O0OO009E 


GRAPHIC REVERSE: 




63 

00O00O9F. 

42A7 


clr.l 

-(sp) 



64 

0O000OAO 

FF20 


dc. w 

_SUPER 



65 

00000OA2 

588F 


addq.1 

#4 , sp 



66 

0O0000A4 

2O7C00C000O0 


moved.1 

#VRAM,a0 



67 

00000OAA 

303C0003 


move.w 

#3,d0 



68 

000000AE 


GRREV: 





69 

00000OAF. 

323CFFFF 


move.w 

#-1,d1 



70 

000000B2 

4658 

GRREV64K 

not. w 

<a0) + 



71 

000000B4 

51C9FFFC 000000B2 


dbra 

dl,GRREV64K 



72 

00000OB8 

51C8FFF4 0000O0AE 


dbra 

d0,GRREV 



73 

0O0000BC 

7000 


move.1 

♦READY,d0 



74 

O0000OBE 

41F9(01)000001C6 


lea. 1 

RETDAT,a0 



75 

OO000OC4 

4E75 


rts 




76 

O00000C6 





77 

0OG000C6 


GRAPHIC INVERT: 




78 

0000O0C6 

42A7 


clr.l 

-(sp) 



79 

000000C8 

FF20 


dc. w 

_SUPER 



80 

000000CA 

588F 


addq.1 

#4 , sp 



81 

000000CC 

207C00C00000 


movea.1 

♦VRAM,a0 



82 

O000O0D2 

203C000001FF 


move.1 

#511,d0 

* 

Line counter 

83 

00000OD8 


INV SCRN: 





84 

0O00O0D8 

2248 


movea.1 

a0, a 1 



85 

000O00DA 

D1FCO00O0400 


adda.1 

♦1024,a0 



86 

OO00OOEO 

2448 


movea.1 

a0, a2 



87 

0O000OE2 

323C00FF 


move.w 

♦255,dl 



88 

000000E6 







89 

00000OE6 

3411 

INV 1 LINE 

move.w 

(al),d2 



90 

00000OE8 

32E2 


move.w 

-(a2),(al)+ 



91 

000000EA 

3482 


move.w 

d2 , (a2) 



92 

000000EC 

51C9FFF8 000000E6 


dbrn 

dl , INV 1 LINE 



93 

000O00FO 

51C8FFE6 000000D8 


dbra 

d0,INV SCRN 



94 

000000F4 

7000 


move.1 

♦READY,d0 



95 

000000F6 

41F9(01)000001C6 


lea. 1 

RETDAT,a0 



96 

00O0O0FC 

4E75 


rts 




97 

000000FE 



mode . 



98 

000000FE 


GRAPHIC_MODE: 





99 

OOO000FE 

222F000C 


move.1 

12(sp),dl 



100 

00000102 

7010 


move. 1 

♦$10,d0 



101 

00000104 

4E4F 

* 

trap 

♦ SGf 



102 

00000106 

7000 


move. 1 

♦READY,d0 



103 

00000108 

4 1F9(01>00000106 


lea. 1 

RETDAT,a0 



104 

0000010E 

4E75 


rts 




105 

00000110 


*. 

Memory read 




106 

000001 10 


MEMORY_READ: 





107 

000001 10 

42A7 


clr.l 

- ( sp) 

* 

Enter supervisor state 

108 

00000112 

FF20 


dc. w 

_SUPER 



109 

00000114 

588F 


addq.1 

#4 , sp 



110 

00000116 

202F0OOC 


move.1 

1 2(sp),d0 

* 

Access size check 

111 

000001 1A 

008000000002 


cmpi.1 

♦ 2, d0 

* 

Access size <= 2 ? 

112 

00000120 

6F08 0000012A 


bl e 

RD MODE OK 

* 

Yes, then branch 

113 

00000122 

4 3 F 9(01J0000019E 


lea. 1 

E MODE,a 1 

* 

Error message set 

114 

00000128 

606A 00000194 


bra 

ERROR AUX 



115 

0000012A 

4281 

RD_MODE_OK 

clr.l 

dl 



116 

0000012C 

242F0016 


move.1 

22(sp),d2 

* 

get address 

117 

00000130 

2642 


movea.L 

d 2 , a 3 



118 

00000132 

51080006 0000013A 


dbra 

d0,RD NOTBYTE 

t 

D0 == 0 ? 

119 

00000136 

1213 


move.b 

(a3),d1 

* 

yes, then peek memory (BYTE) 

120 

00000138 

600A 00000144 


bra 

RD READY AUX 



121 

0000013A 

51080006 00000142 

RD_NOTBYTE 

dbra 

d0,RD NOTWORD 

* 

D0 == 1 ? 

122 

0000013E 

3213 


move.w 

(a3),dl 

* 

yes, then peek memroy (WORD) 

123 

00000140 

6002 00000144 


bra 

RD READY AUX 



124 

00000142 

2213 

RD NOTWORD 

move.1 

(a3),d1 

* 

LONG WORD Access 

125 

00000144 

2301(01)00000100 

RD_READY_AUX 

move.1 

dl ,INT DATA 

* 

store return data 

126 

0000014A 

41F9(01>00000106 


lea. 1 

RETDAT,a0 

* 

return data pointer setup 

127 

00000150 

7000 


move. 1 

♦READY,d0 

* 

return status = READY 

128 

00000152 

4E75 


rts 


* 

Bye,bye 

129 

00000154 







130 

00000154 


*. 

Memory write 




131 

00000154 


MEMORY_WRITE: 





132 

00000154 

42A7 


clr.l 

-(sp) 

t 

Enter supervisor state 

133 

00000156 

FF20 


dc. w 

_SUPER 



134 

00000158 

588F 


addq.1 

♦ 4 , sp 



135 

0000015A 

202F000C 


move.1 

12(sp),d0 

* 

Access size check 

136 

0000015E 

0C8000000002 


cmpi.1 

#2,d0 

t 

Access size <= 2 ? 

137 

00000164 

6F08 0000016E 


ble 

WR MODE OK 

t 

Yes, then branch 

138 

00000166 

43F9(01J0000019E 


lea. 1 

E MODE,a 1 

* 

Error message set 

139 

0000016C 

6026 00000194 


bra 

ERROR AUX 



140 

0000016E 

242F0016 

WR_MODE_OK 

move.1 

22 ( sp) ,<12 

* 

get address 

141 

00000172 

2642 


movea.1 

d2,a3 



142 

00000174 

222F0020 


move.1 

32(sp),d1 



143 

00000178 

5 1C80006 00000180 


dbra 

d0,WR NOTBYTE 

* 

D0 == 0 ? 

144 

0000017C 

1681 


move.b 

dl , (a3) 

* 

yes, then poke memory (BYTE) 

145 

0000017E 

600A 0000018A 


bra 

WR READY AUX 



146 

00000180 

51C80006 00000188 

WRNOTBYTE 

dbra 

d0,WR NOTWORD 

* 

D0 == 1 ? 

147 

00000184 

3681 


move.w 

dl,(a3) 

* 

yes, then poke memroy (WORD) 

148 

00000186 

6002 0000018A 


bra 

WR READY AUX 



149 

00000188 

2681 

WR NOTWORD 

move.1 

dl,(a3) 

* 

LONG WORD Access 

150 

0000018A 

41F9(01>00000106 

WR READY_AUX 

lea. 1 

RETDAT,a0 

t 

return data pointer setup 

151 

00000190 

7000 


move.1 

♦READY,d0 

* 

return status = READY 

152 

00000192 

4E75 


rts 


* 

Bye,bye 

153 

00000194 







154 

00000194 


*. 

Error Return 




155 

00000194 

41F9(01>00000106 

ERRORAUX 

lea. 1 

RETDAT,a0 

* 

return data pointer setup (Nothing 

156 

0000019A 

7001 


move.1 

♦ERROR,d0 

« 

return status = ERROR 

157 

0000019C 

4E7 5 


rts 




158 

0000019E 








to mean) 


















1000 
1010 
1020 
1030 
1040 
1050 
1060 
1070 
1080 
1090 
1100 
1110 
1120 
1130 
1140 
1150 
1160 
1170 
1180 
1190 
1200 
1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 
1310 
1320 
1330 
1340 
1350 
1360 
1370 
1380 
1390 
1400 
1410 
1420 
1430 
1440 
1450 
1460 
1470 
1480 
1490 
1500 
1510 
1520 
1530 
1540 
1550 
1560 
1570 
1580 
1590 
1600 
1610 
1620 
1630 
1640 
1650 
1660 
1670 
1680 
1690 
1700 
1710 
1720 
1730 
1740 
1750 
1760 
1770 
1780 
1790 
1800 
1810 
1820 
1830 
1840 
1850 
1860 
1870 
1880 
1890 
1900 
1910 
1920 
1930 
1940 
1950 
1960 
1970 
1980 
1990 
2000 
2010 
2020 
2030 
2040 
2050 
2060 
2070 


159 0000019E 0D0A8341834E835A E_MODE 

835881458382815B 
836882CD824F82A9 
82E7825182DC82C5 
82C582B7814200 

160 000001C5 000000 RETDAT 

161 000001C8 00000000 

162 00000ICC 00000000 INT_DATA 

163 000001DO 


dc. b 


dc. w 
dc. 1 
dc. 1 
end 


CR, LF, 1 7 ? -fe X 


t-Ktt0i»62*TTt. ’ , BOS 




/* - User function headder table genereter -*/ 

str CRLF.CTAB /* 'tab' is reserved */ 

CRLF=chr$(4HD)+chr$(AHA):CTAB=chr$(4H9) 
dim str fname(20) 
dim str vname[80] 
dim char vtype(2O,10) 
dim char ftype(20) 
str rfilename 
str s[80],t[80] 
str typetable(5) = 1 
"float", 

"int", 

"char", 

"str", 

"void" ) 

str paramtype(5) = { 

"Z_FLOAT_VAL", 

"Z_INT_VAL", 

"Z_CHAR_VAL", 

"Z_STR_VAL", 

"Z_lNT_OMT" ) 
str functype(5) = { 

"Z_FLOAT_RET", 

"Z_INT_RET", 

"Z_CHAR_RET", 

"Z_STR_RET", 

”Z_VOID_RET" ) 
int n,textp 
int rfp,wfp 

input "Function table file name input ";rfilename 
rfp = fopen{rfilename+".nam","r") 
if rfp = -1 then print"File not found!"rend 
wfp = fopen(rfilename+".inc","c") 

if wfp = -1 then print"Can’t create output file!"rend 
n=0 

print"Function file read" 
repeat 

if freads(s,rfp)=-l then { 
generate() 
end 

) 

printrprint s 

textp=0 

vn=0 

if gettoken))=0 then end 
fname(n)=t 

if gettoken))<>’(' then erraux() 
gettoken( ) 
while t[0 | < > * )» 

if not isalpha(t[0 ) ) then erraux)) 
vname = trprint"<";tr"; 
switch gettoken)) 

case ';* r gettoken)) 

print t;">"; 
setvtype)t) 

if gettoken))=’,* then gettoken)) 
break 

case ’ print "INT";">"; 

setvtype)"int") 
gettoken)) 
break 

case ')’: print "INT”;”>"; 

setvtype)"int") 
break 

defaultr break 
endswitch 

endwhile 
vtype(n,0)=vn 
if gettoken))=’;’ then { 
gettoken)) 

print t 
setftype)t) 

} else ( 

print "VOID" 
setftype)"void") 

) 

until 0 
end 
/* 

func gettoken)) 
int i 
char c 

for i=0 to 79 
tli1=0 

next 

skipspace)) 

i = l 

c=s)textp) 
t)0)=c 

textp=textp+l 
if isnanchr(c) then { 
c=s[textpJ 
while isnamchr(c) 
t[i]=c 
i = i +1 

textp=textp+l 
c=s(textp] 

endwhile 
skipspace)) 

) 

return)tl0]) 
endfunc 

/* 

func skipspace)) 

while isspace)s)textp]) 
textp=textpfl 

endwhile 

endfunc 


2080 /* 

2090 func erraux)) 

2100 print "ERROR"rend 
2110 endfunc 
2120 /* 

2130 func isnamchr(c;char) 

2140 if isalnum(c) or )c=’_’) then return (-1) else 
2150 endfunc 
2160 /* 

2170 func setvtype(s;str) 

2180 int i 
2190 vn=vn+l 
2200 for i=0 to 3 

2210 if s=typetable(i) then { 

2220 vtype(n,vn)=i 

2230 return) ) 

2240 ] 

2250 next 
2260 erraux)) 

2270 ) 

2280 /* 

2290 func setftype(s;str) 

2300 int i 

2310 for i=0 to 4 

2320 if 8=typetable{i) then ( 

2330 ftype(n)=i 

2340 n=n+1 

2350 return)) 

2360 ) 

2370 next 
2380 erraux)) 

2390 ) 

2400 /* 

2410 func generate)) 

2420 int i,j r vn 

2430 print"Standard header table generate . 

2440 fwrites(CTAB+".include osmac.inc"+CRLF,wfp) 
2450 fwrites(CTAB+".include iocsmac.inc"+CRLF,wfp) 
2460 fwritea(CTAB+".text"+CRLF,wfp) 

2470 dclwrite)*1*,"X_INZ") 

2480 dclwrite) ’ 1’,"X_RUN") 

2490 dclwrite)’1*,"X_END") 

2500 dclwrite)•1•,"X_SYSTEM") 

2510 dclwrite)•1’,"X_BRK") 

2520 dclwrite)'l*,”X_CTRL_D") 

2530 dclwrite)’1’,"X_RETADRS1") 

2540 dclwrite)*1*,"X_RETADRS2") 

2550 dclwrite)’1"PTR_TOKEN") 

2560 dclwrite)’1’,"PTR_PARAM") 

2570 dclwrite)’1*,"PTR_EXEC") 

2580 dclwrite)’1’,"0,0,0,0,0") 

2590 print"Done" 

2600 print"Function name table generate . 

2610 lblwrite{"PTR_TOKEN") 

2620 for i=0 to n-1 

2630 dclwrite)’b’,"*"+fname(i) + "’,EOS" ) 

2640 next 

2650 dclwrite)’b’,"EOS") 

2660 print"Done" 

2670 print"Paraneter pointer table generate . 

2680 lblwrite)"PTR_PARAM") 

2690 for i=0 to n-1 

2700 dclwrite)’1 *,fname(i)+"_param") 

2710 next 

2720 print"Done" 

2730 print"Paraneter table generate . 

2740 for i=0 to n-1 

2750 vn = vtype(i,0) 

2760 lblwrite)fname(i)+"_param") 

2770 for j=l to vn 

2780 dclwrite)’w',paramtype(vtype(i, 

2790 next 

2800 dclwrite)’w’,functype)ftype)i))) 

2810 next 
2820 prinf'Done" 

2830 prinf'Exec address table generate . 

2840 lblwrite)"PTR_EXEC") 

2850 for i=0 to n-1 

2860 dclwrite)’1* ,fname(i)) 

2870 next 

2880 print"Done" 

2890 print"Standard exec address table generate ... 
2900 lblwrite)"X_INZ") 

2910 lblwrite("X RUN") 

2920 lblwrite)"X_END") 

2930 lblwrite)"X_SYSTEM") 

2940 lblwrite)"X_BRK") 

2950 lblwrite)"X CTRL_D") 

2960 lblwrite("X_RETADRS1") 

2970 lblwrite)"X RETADRS2") 

2980 lblwrite)"PTR_TOKEN") 

2990 lblwrite)"PTR_PARAM") 

3000 lblwrite)"PTR_EXEC") 

3010 fwrites)CTAB+CTAB+"rts"+CRLF,wfp) 

3020 print"Done" 

3030 endfunc 
3040 /* 

3050 func dclwrite(c;char,s;str) 

3060 fputc)AH9,wfp) 

3070 fwrites)"dc.",wfp) 

3080 fputc(c,wfp) 

3090 fputc)AH9,wfp):fputc(4H9,wfp) 

3100 fwrites)s+CRLF,wfp) 

3110 endfunc 
3120 /* 

3130 func lblwrite)s;str) 

3140 fwritea(s+":"+CRLF,wfp) 

3150 endfunc 


return)0) 


j))) 


40 Oh! MZ 1987 8. 
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'4ts:t **!*§ i £ 
C. tlftfiT'ft -7 I' fc*gli 4 4- b r GOTO 
3000j t L f < 4'S l'o 3000ft*- C. Ii£t ; 

4BASIC©7°b 7"7 r>f y t 

4* { A-5Tl'it» <ft<"ftt r RUN 3000j 

t L*i'Jt 5 

r GOTO 3000j © A' ft j&M&fco 4 f, X® 
77ft^n-F'Lt*-C< 4'$ i'o 

5 ft4i** ? a F> ft i to #CMUTO*r 

ffiZkAtl L Ti-oT < 4'$i'„ 

COLNOa^ll 


COLNI:l£ 2 o©fc* (t* ? #i-'Ti.-i-t„ 
[> i Oliioooft*- F) ©7°y > F 7 9 h 7° a 
/ft, t 9 0tO(i2000ft*-t,©ftS^ 

1 7"n/5 A-T’-fo 

7 “y > h r v h -r n y? u a £* cf© 

“▼” fcjRo-CT’y 44*© 

7°b r? A-trto COLN 4RUN L 4 
4 t. (MZ-25004 F>COLN 5f — S'C' fc lift 
L4*t4F»i-o-r'{)) r GOTO 1000j t 


SiCl-x-t'Ux-i'COLN 


MZ-2500(BASIC-M25 V2.0)ffi 

100 REM <<<<< WP-Print Utility >>>>> 

110 CLS:DEF INT A-Z 

120 FILNAM$ = ” V 5/ > SS 20” » y 7 j £ 

130 WD=29 • 1 ft 0) X # ft 

140 KS= 1 • * fllj ft U (1/0) 

150 REM <<< read sentence >>> 

160 CLS : N$ = ” ’’ 

170 OPEN "I" ,#l .FILNAMS : OPEN "O",#2,"TEXT" 

180 WHILE EOF(1)=0:LINE INPUT tl,M$:GOSUB 220:WEND 
190 CLOSE #1:P$=N$:GOSUB 590 : CLOSE #2 
200 KILL FILNAMS:NAME "TEXT" as FILNAMS 
210 BEEPrEND 

220 REM <<< print main >>> 

230 IF MS="T" THEN 
240 IF NS = "" THEN 
250 P$ = MS:GOSUB 590 

260 ELSE 

270 PS=N$:GOSUB 590:PS=MS:GOSUB 590:NS= H " 

280 END IF 
290 RETURN 
300 END IF 
310 NS=N$+M$ 

320 WHILE LEN(NS)>WD* 2 + 2 
330 Y=INSTR(N$,"T") 

340 IF Y AND Y=<WD*2+1 THEN GOSUB 360 ELSE GOSUB 390 

350 WEND:RETURN 

360 REM <<< return mark >>> 

370 PS = LEFTS(NS,Y+1):GOSUB 590:N$=MIDS(NS,Y + 2) 

380 RETURN 

390 REM <<< normal print >>> 

400 C=WD-1:REPEAT:X=Y:Y=Z:Z=KPOS(NS,C):C=C+1:UNTIL Z>WD*2+1 
410 IF KS GOSUB 440 

420 PS=LEFTS(NS,Y-1):GOSUB 590:NS=MIDS(NS,Y) 

430 RETURN 

440 REM <<< kinsoku >>> 

450 CS=MIDS(NS,X,Y-X):ON Y-X GOSUB 530,540 

460 IF C THEN IF Y=<W*2 THEN Y=Z:RETURN ELSE Y=X:RETURN 

470 CS=MIDS(NS,Y,Z-Y):ON Z-Y GOSUB 560,570 

480 IF C THEN 

490 Y=Z 

500 IF MIDS(NS,Y,2)="T" THEN Y=Y+2 
510 END IF 
520 RETURN 

530 C=INSTR("(({ f ",CS):RETURN 

540.C=INSTR(HEXCHRS("816581678169816B816D816F81718173817581778179") ,C$) :RETURN 
550 C=INSTR(" * - ( C [ { < « r r [ ",CS):RETURN 
560 C=INSTR(",)])J",C$):RETURN 

570 C=INSTR(HEXCHRS("814181428143814A814B8 1668 168816A816C816E8170817281748176817 
8817A"),CS):RETURN 

580 C=INSTR(" „ .,'•’•))]}>) j j ] "»CS):RETURN 
590 REM <<< print out >>> 

600 PRINT #2,PS 
610 RETURN 


J f , s4'Ut'X#?:7 , y yftr.&ti LIT. 
ff4 r- COLN k B - K L44 b FILNAMS 

11- 7 ^SC7°y > 1 7t> h L/ci-77 4 

up h Kt'-t -7 h L r GOTO 

lOOOj 

1 30 Iff© 7“ y yfikism i'©^riii040ft 
© r FOR 1 = 0 TO 19j k r FOR 1 = 0 TO 
39j IZ&U%\£ 2 tfk&.'CX.mkIX, jl?*> Z 
t m&oMtu. i fti9X^-rft 

% tu l 4 1 & n s 17 c 4 

oft'it©f, ft^ai-tx#© 1 ft©# 
T1150, 1170ft4iii^l-^lE 
Ltto-C < 4*51'„ 

<4'©ft & j) t>y 1 7° B /ftlftn- n'\x 

r" /f ^ *H - i (BJft S 4 © *■ k IStf L T < ft 


1000 »- 

1010 OPEN “I",#!,FILNAMS 
1020 DIM LINS(39) 

1030 LPRINT:LPRINT 
1040 FOR 1=0 TO 19 
1050 IF EOF(1)=0 THEN 
1060 LINE INPUT #1,LINS(I) 

1070 IF RIGHTS (LINS(I),2) = "V" THEN 

1080 LINS(I)=LEFTS(LINS(I),LEN(LINS(I))-2) 

1090 END IF 

1100 ELSE 

1110 LINS(I)="" 

1120 END IF 
1130 NEXT 

1140 FOR 1=0 TO 19 

1150 LPRINT " ";LINS(I); 

1160 LPOUT CHRS(13) 

1170 LPRINT STRINGS(73," ");LINS(1+20) 

1180 LPRINT:LPRINT 

1190 NEXT 

1200 IF EOF(1) THEN CLOSE:LPRINT CHRS(12);:END 
1210 LPRINT CHRS(12):LPRINT:LPRINT 
1220 GOTO 1040 

2000 »- 

2010 CLS 

2020 OPEN "I",#1.FILNAMS 
2030 1=0 

2040 WHILE EOF(1)=0 
2050 LIJNE INPUT #1 ,A$ 

2060 1=1+1 

2070 LOCATE 0,0:PRINT I 

2080 WEND 
2090 CLOSE 
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110 CLS:DEFINT A-Z 
230 IF M$ = "ir" THEN 240 ELSE 310 
240 IF NS = ’ " THEN 250 ELSE 270 
250 PS=MS:GOSUB 590 : GOTO 290 

270 P$=N$:GOSUB 590:PS=MS:GOSUB 590:NS=’”‘ : GOTO 290 

480 IF C THEN 490 ELSE 520 

500 IF MIDS(NS,Y,2)="T" THEN Y=Y+2 : GOTO 520 
510 ’END IF 

1050 IF EOF(1)=0 THEN 1060 ELSE 1110 

1070 IF RIGHTS(LINS(I),2) = " ▼" THEN 1080 ELSE 1130 

1080 LINS(I)=LEFTS(LINS(I),LEN(LINS(I))—2) : GOTO 1130 

1110 LINS(I) = "” : GOTO 1130 

3000 ’- 

3010 OPEN "I",*1,FILNAMS 

3020 LNUM=10 

3030 OPEN "O",#2,"TEXT" 

3040 WHILE NOT EOF(1) 

3050 LINPUT #1,AS 

3060 AS=MIDS(STRS(LNUM),2)+.+A$ 

3070 LNUM=LNUM+10 
3080 PRINT #2,AS 
3090 WEND 
3100 CLOSE 

3110 KILL FILNAMS : NAME "TEXT" AS FILNAMS 
3120 END 
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MZ-2500S 

10 ’ / * 

20 ’ 6 < 6 < SYMBOL M Z -250U$ 

30 ’ written by £ - < /L 

40 » */ 

50 init "crt:80,25,1,0” 

60 init "mem:0,0":init "mem:" + strS(fre(4 )/1024 ) 

70 gsave "mem:temp",(0,0)-(0,0) 

80 klist 0:kmode 1 
90 CR$=chr$(13):BK$=chrS(27) 

100 MAX_Xs319 I'HifiWKv h» - 1 ( 319/639) 

110 MAX Y =199 : * Bl jfi fH K hS - 1 (199/399) 

120 MAX _C= 15 : ’ £ & - 1 (3/15/255) 

130 init "crt2:"+str$(MAX_X+l) + "," + atrS(MAX Y+1 ) +”," + strS(MAX_C+1) 
140 ’ |5 $ 

150 view® (1,l)-{0,0):els:locate 0,0,2 


160 

input " 

% * X ft ' 

" ,c 

170 

if C<0 then print chr$(4,12>:end 



180 

input " 

«« m ' 

' ,MUL X 

190 

input " 


" ,MUL Y 

200 

input " -t - K • 0 ( M m ), i ( 8* ft $ ) 

,2 (# ) ’ 

" ,MDE 

210 

if MDE=0 goto 250 



220 

input " 

V 6 

" ,SHDW_C 

230 

if MDE=2 goto 250 



240 

input- n e m ) ,-l( £ AN ) 

" , SHDW_D 


250 X = 0 : Y = 0 

260 1 * -f > )|, - 7 

270 locate 0,0,2 

280 view® (0,16 )-(MAX_X,MAX Y) 

290 els: input " £ * ? 6 % ^ ?'J : " , PR$ 

300 locate 0,0,0:els:view® (0,0)-(MAX_X,MAX_Y) 

310 if PR$ = then 140 

320 SIZ_X=(len(PR$)*8+MDE)*MUL_X-l:if SIZ_X>MAX_X then SIZ_X=MAX_X 
330 SIZ_Y=(16+MDE)*MUL_Y-1:if SIZ_Y>MAX_Y then SIZ_Y=MAX_Y 

340 repeat 

350 line (X,Y)-(X+SIZ_X,Y+SIZ_Y),xor ,,B 

360 A$=input$(1):DONE={A$=CR$) 

370 A=val(A$):if (A = 5) or (A = 0) and (A$OBK$) and |A$OCR$) then 360 

380 if A then 390 else 430 

390 DX=((A+2) mod 3-1)<8:DY=(2-(A+2)¥3)*8 

400 line (X,Y)-(X+SIZ_X,Y+SIZ_Y),xor ,,B 

410 gosub 740:goto 460 

420 ’ else 

430 line (X,Y)-(X+SIZ_X,Y+SIZ_Y),xor ,,B 

440 1 end if 

450 if A$=BK$ then 260 

460 until DONE 

470 repeat 

480 kill "merartemp" 

490 gsave "mem:temp",(X,Y)-(X+SIZ_X,Y+SIZ_Y) 

500 on MDE+1 gosub 650,610,680 

510 A$=inputS(1):DONE=(A$=CR$) 

520 A=val (A$) : if (A=5) or (A = 0) and (ASOBKS) and (A$OCR$) then 510 

530 if A then 540 else 570 

540 DX=(A+2) mod 3-1:DY=2-(A+2)¥3 

550 gload "mem:temp”,(X,Y):gosub 740:goto 590 

560 * else 

570 if A$=BKS then gload "mem:temp",(X,Y):goto 340 

580 * end if 

590 until DONE 

600 goto 260 

610 ’fc 

620 for I=SHDW_D to SHDW_D*MUL_X step SHDW_D 

630 symbol (X+I,Y+MUL_Y/MUL_X*abs(I)),PR$,MUL_X,MUL Y.SHDW C 

640 next 
650 ’ a m 

660 symbol (X , Y) , PR$ , M(JL_X , MUL_Y, C 
670 return 
680 ’ g 

690 for 1=0 to 2:for J=0 to 2 

700 symbol (X+MUL_X*I,Y+MUL_Y*J),PR$,MUL_X,MUL_Y,SHDW C 

710 next:next 

720 symbol (X+MUL_X,Y+MUL_Y),PR$,MUL_X,MUL_Y,C 
730 return 

740 • mb 

750 X=X+DX:Y=Y+DY 

760 if X+SIZ_X>MAX_X then X=MAX_X-SIZ_X 

770 if X<0 then X=0 

780 if Y+SIZ_Y>MAX_Y then Y=MAX_Y-SIZ Y 

790 if Y<0 then Y=0 

800 return 


X1turbofflii*n-S!!E^ 

20’ <3<6 <SYMBOL Xlt urbo ^ 

50 ’ 

60 DEKIRUDAKE_IPPAI = 1000 : * & 9 jg ft ffl £ ^IJ 0) * $ $ 

70 DIM temp#(DEKIRUDAKE_1PPAI) 

120 » 

130 ’ 

150 PALET© 0,0,0,0,0,0,0,0:CLS:KEY 0,"" 

170 IF C<0 THEN INIT:CLS:END 
270 KEY 0,"":PR$="" 

280 PALET8 0,1 , 1 , 1,1,1 , 1,1 
300 CLS:PALET® 0,1,2,3,4,5,6,7 
340 KEY 0,"":REPEAT 
360 GOSUB 810:DONE=(A$=CR$) 

470 KEY 0,"":REPEAT 
480 ’ 

490 GET® (X,Y)-(X+SIZ_X,Y+SIZ_Y),TEMP#,7 

510 GOSUB 810:DONE=(A$=CR$) 

550 PUT® (X,Y),TEMP#,PSET,7:GOSUB 740:GOTO 590 

570 IF A$=BK$ THEN PUT® (X,Y),TEMP#,PSET,7:GOTO 340 

810 REPEAT:a$=INKEYS(0):UNTIL a$<>"":RETURN 
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f 1 ! * 7 7 (C-OS, 'T©«S!Tto 

tAt TJ!!!rri?Sr~. *^*^• 1.1 

01 87T&6/23 22:53 L004 , 

1 KGK002 87/06/25 23:09 L005 5G£>CP/MtCOt'Tfi 
9 NJG001 87/06/20 21:55 L017 7-K'O* LXfiSMC*,' 

1 UJJ001 87/05/01 19:02 L052 7^ 

6 PJY001 87/06/27 00:00 L024 f3 ^ (±) 


9 PJY001 87/06/24 04:22 L030 
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y i L4o 7— 7°utt 
bXj 11' 9 AHOS^fTIS4Tift ttT 4 -t 
h 4 ^ |t 40T'T 0 


■01 S^tUfflGtSU^ 

<TEXT-BOX>(501tX10) 



© [CTRL-X]/[SAVE] 

© [CTRL-X]/[MERGE] 

© SAVE 
@ LOAD 

© [CTRL-X]/OJJ0 t «;] ttzit [¥L £*J] 
© [CTRL-X]/[li0Od] 


1 85 
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[7] 

[8] U-y'7/>Jt-f ■ t-y h^-v-h 

[ ? ] ^\/Lr 

[EXIT] i^7 

--> 

2 

: • -•v^y^riS 

«> [37XK] 

GO 51 

: * 7yfUt' 

: 49IT 

—> [37ZK] 

Lie 

(*«> : A • 7 y f U L 

1 PJYO01 87/06/26 23:27 L051 itli3«ftft^~ ^ Al^-X" 6 2 8 ( 13 ) 

2 PJY001 87/86/26 02:04 L039 «/ J?T4»ltt(C «t & 0 a - Xftg 

3 PJY001 87/06/26 01:55 L056 r gh >j - h WliS j 7 A h 

4 PJY001 87/06/26 01:55 L065 g *X h l J - h V)|iS j (7/5^^- k ) 

5 PJY001 87/06/27 00:00 L022 'XU/f^7j 7/3 ( £) 

6 PJY001 87/06/27 00:00 L024 ' 3 $ -y ? ! j 7/4 (±) 

7 PJY001 87/06/26 00:09 L039 r I 7/3 ( & ) 

8 PJY001 87/06/25 00:00 LO30 r ? 4r tw<j: 0 t Kit tz t> j ('751 3 0) 7/2 (A) 

9 PJYO01 87/06/24 04:22 L03O r T 'JXX< OZ&fzh j (75120)7/1(40 

10 PJY001 87/06/24 04:21 L031 r j (14*^0) 6/2 9 (^) 

--> [ayy]i] 

D9 

9 PJY001 87/06/24 04:22 L03O r r 'j XX<7)Z.^C^ ij j (751 20) 7/1 (40 
f* 8 : 00-8 : 54 

uw;< 7)£>£ o*mm (MWPt?) zk'u r-c* c*>? t lx mm* *>&*>. & 
<s«lll (ttHttl*) ayf^^(iSii*C(5Lv^!f0t/ Mnzt* 

/i o 4:. 


7(7 Oh! MZ 1987.8. 


















a, r r*x b *'y 

affl-r-r. b i cd j 5 c & 0 * t. *«=w 

r.irn i-c^ito 


*'>SS^-7h 


i ft -7 h&^-x h*‘C, 0 

«J> 40 li D HfWIiii* t 

-r i i a i t* f , t-wmiEH t 

l -cits 1 , n*t©*#©i 

ati.'T*L«6 

-xigS££ffllTt.'i to 

ffljfclLtHfigli, 

• ^SlTlfA (INSERT) 
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1 1 0 
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INIT "CRT:,, , 0 “ :NEW ON 1 
KL1ST 0 

CONSOLE 0,24,0,80 

CLS 2 : COLOR 7 

UP-30:DN-31:RT-28:LT-29 


PG-0: ' 

X-ls* X*« 

Y * 1 : ‘ Y&«& 

YS-1:' 2* ^ 08 tor ft 

YR- 1 : ' Y £ m <T> tf X 4 > * 

XM “ 80 : 1 ft X^Vl. ( *f ) 

YM- 2 9 9 : X » <0 ft ft 

YE- 1 : ' X » <h Kk K 

VM - 5 0 : VSfDftft 

MKX-&J2170: Ifi # <0 # 

REM - F * - <F> 15 % 


KEY (1) ,CHR$ (1) 

KEY (2) , CHRS (22) 

KEY ( 3) , CH RS ( 3) 

KEY (4) .CHRS (10) 

KEY (5),CHRS (19) 

KEY (6) , CHRS (24) 

KEY (7) , CHRS (6) 

KEY (8), CHRS (7) 

KEY (9) , CHRS (16) 

KEY (10) , CHRS (2 3) 

CREV 1 

FOR Z-0 TO 9 

READ Z$:LOCATE Z*7,24:PR1NT ZS; 

NEXT Z 

CREV 0 : LOCATE 3 4, 2 4:P RI NT '|'5 

DATA ft W A .ft H>J to . ± « ^ -T il *8 , « ft 

DATA Cut&Pa,10ff l ,10ff T ,^^«E,TxtBOX 

REM - DJ m » « : 

COLOR 5:CREV 1:LOCATE 0,0:PRINT CHRS(5); 

PRINT TAB (10);'* SuperkO;& 1 £<A,:lD8H!&^ * ‘I 
COLOR 7:CREV 0 
LOCATE 39,3:PR1 NT '2' 

LOCATE 0, 3: INPUT '# ( 1 or 2 ): FDS 

IF FDS<>* 2' THEN FDS-'l' 

FDS-FDS+':“:CHDIR FDS 
LOCATE 39,6:PR I NT ”80 

LOCATE 0, 6 : INPUT '# Iff ft it U < 4Clif A» ( 1 - 80 ): '.XM 
LOCATE 3 9,9:PR 1 NT ' 300' 

LOCATE 0, 9: INPUT ’# ft & li < h lZ l £ t fr ( 1 - 30 0 ) : ", YM 
COLOR 5:CREV 1:LOCATE 0. 12:P RI NT CH RS (5) ; 

COLOR 6:CREV 0 

LOCATE 10, 15: INPUT "# V* T T *' ? (Y/N) : ",ANSS 

IF ANSS-'N" OR ANSS-'n" OR ANSS-'N" OR ANSS-'n' THEN 510 
DIM WS (1,YM+1) ,VS (10,50) ,BAFAS (100) 

CLS 2 

FOR ZY-1 TO 2 e : FOR ZX-0 TO XM/2:PSET (ZX*8,ZY*8),9 : NEXT:NEXT 

REM - ■ a i n () I 

CLS:COLOR 7:CREV 0 

PRINT TAB (10) !"* tttttt***t*t**$t***' 

PRINT TAB (10) ; "* i « ,t • 0 * i 7 - K 7 n 1: 7 t *' 

PRINT TAB (10);'* ♦ Superior £</, ♦ *' 

PRINT TAB (10) !'* *******************' 

COLOR 4:CREV 1 

LOCATE 15,5:P RI NT '<< MENU >>" 

LOCATE 15,21-PRINT " [CR ]V ft. ^ / ANY-8 IK ' 

PAUSE 5 

CREV* ( 1 5, 6) - (36,2 0) , 1 
COLOR* ( 1 5, 6) - (36, 20) , 5 
COLOR 7 

FOR Z-l TO 7:G0SUB 880:NEXT Z 
Z- 1 

COLOR 6 : GO SUB 880 
ZS-INKEYS:IF ZS-“" THEN 830 
IF ZS-CHRS(13) THEN 970 
COLOR 7:GOSUB 880 
Z-Z+l:IF Z>7 THEN Z-1 
GOTO 820 
LOCATE 1 6, Z*25 

ON Z GOSUB 900,910,920,930,940,950,960:RETURN 

PRINT "EDIT " : RETURN 

PRINT "LOAD " : RETURN 

PRINT 'SAVE " : R E T U R N 

PRINT "PR I NT " : RETURN 

PRINT " DELETE " : RETURN 

PRINT " MERGE * : RETURN 

PRINT " The END " : RETURN 

COLOR 7:CREV 0 

ON Z GOTO 1000,5090,5500,5690,5950.6070 
CREV 0:C 0 L 0 R 7:END 

REM . 144 m $: fJf) te ! 

CLOSE:OPEN "0",#3,"CRT1:CG' 

X-l:Y-l:YS-l:YR-l 
GOSUB 1240 
GOSUB 1100 

IF YE<YR THEN YE-YR 
FOR Z-l TO 19 

LOCATE 0,Z:PR1 NT #3,WS (PG,YS♦Z- 1) J 

NEXT 

GOTO 1290 

sub - @0Q^IU8fll£5E: 

COLOR 7 : CREV 0:CLS 

LOCATE 0 , 0 : P R I NT "-♦-<< Supe r t i < ^ 

PRINT "-+-+..+- 

IF PG-1 THEN 
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y \° y 3 y jjji is "j |' 7 — ^ } s -f 3 o "C l' i 
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■Hitl'IXo'C, r + x h^7^xCJ|Xi^L 
T, Z4i?ti& T'UftL 

i_-? i.XmmX$ it. £ 
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1158 CREV 1:COLOR 6 

1160 LOCATE 4 0,0 : PRlNT 

1170 CREV 0:COLOR 7 

1180 END IF 

1190 LOCATE 0,2 0:PR I NT *--- - 1----2----3--- 

1200 PRIKT”—-——S—--- e----7-—— 

1210 COLOR 5 

1220 C$-' ':C-0:LOCATE 15,21 

1230 RETURN 

1 240 sub - YE ( « ** ft ) £;£*>& ; 

1250 FOR Z-YM TO 1 STEP 1 

1 260 IF WS (PG,Z) <>" THEN YE-Z:G0T0 1280 

1 270 NEXT Z:YE - 1 

1280 RETURN 

1 290 REM. I N K E Y $ ; 

1 300 LOCATE 0,21:P RI NT CHRS (26) ; 'i-)%:' X;YR 
1310 C$-MID$(W$(PG,YR) ,X,2) : IF C$-'“ THEN CS-' * 

1 320 CREV 1 : COLOR 7:L0CATE X-1,Y:PRINT #3,C$; 

1 330 KS =IHKEYS:IF K$-“‘ THEN 1330 
1 340 CREV 0 : COLOR 5:L0CATE X-1,Y:PR I NT #3,CS; 

1 350 K - A SC (KS) 

1 360 IF K>31 THEN 1710 

1370 IF K<28 THEN 1880 

1380 IF K-LT THEN 

1390 IF YR-1 AND X<2 THEN 1290 

1400 X-X-2 

1410 IF X<1 THEN X-XM-I:YR“YR-1:Y-Y-1 

1420 END IF 

1430 IF K-RT THEN 

1440 IF YR-YM THEN 1290 

1450 X-X+2 

1460 IF X>XM THEN X-1 ' YR-YR+1:Y-Y+1 

1470 END IF 

1480 IF K-UP THEN 

1490 IF YR-1 THEN 1290 

1500 Y-Y-l:YR-YR-1 

1510 END IF 

1520 IF K-DN THEN 

1530 IF YR-YM THEN 1290 

1 5 4 0 Y-Y+1:YR-YR+ 1 

1550 END IF 

1 560 REM .*j& ft & ft ; 

1570 IF YR>YE THEN YE-YR 
1 580 IF Y> 0 AND Y< 2 0 THEN 1290 
1590 CONSOLE 1,19 

1600 IF Y<1 THEN 

1610 Y-l :YS-YS-1:IF YS<1 THEN YS-1 

1 620 LOCATE 0, 1:PR I NT CHR$ (15) ;:PR I NT »3,W* (PG,YR) ; 

1630 END IF 

1 640 IF Y> 1 9 THEN 

1658 IF YR>YM THEN 1050 

1 660 Y- 1 9:YS-YS+ 1: IF YS>YM-19 THEN YS-YM-19 

1 6 7 0 LOCATE 0, 19:PR I NT:LOCATE 0, 1 9 : P RI NT #3,W* (PG,YR) 5 

1680 END IF 

1690 CONSOLE 0,24 

1700 GOTO 1290 

1710 REM . ICt- Ah T t ’• 

1720 ZS-INKEY$ 

1730 IF Z$<>“‘ THEN KS-KS+ZS:GOTO 1720 

1 740 !f$-W$ (PG, YR) 

1 7 50 IF LEN (WS)<X- 1 THEN WS-LEFTS ( (W$+SPACES (X)),X-1) 

1 76 0 WS-LEFTS («$,X-1)+K$ + MID$(W$,X, 255) 

1770 NS (PG,YR) -LEFTS (WS,XM) :WS-M1DS(W$,XM+1,25 5) 

1 780 X-X + LEN (KS) 

1790 IF WS-"” THEN 1850 

1800 YR-YR+1 

1810 GOSUB 2910 

1820 YR-YR-1 

1830 IF X>XM THEN X - X-XM:Y-Y+ 1 sYR - YR+ 1 

1840 GOTO 1040 

1 850 LOCATE 0,Y:PR!NT SPACES (XM) ; 

I860 LOCATE 0,Y:PRINT #3,W$ (PG,YR) ; 

1870 GOTO 1560 

1 880 REM - . m & * ~ W $ h tz t £ 


1890 

IF 

K-l THEN 

GOSUB 2360 

: GOTO 1040:REM - - Lins 

1900 

IF 

K-22 THEN 

2430:REM 

- 1 *7 HI ftfc 

1910 

IF 

K = 3 THEN 

2 5 7 0 : REM - 

- 1 ft ± ft % 

1920 

IF 

K “ 4 THEN 

2 2 4 0 : REM - 

1 xtmib 

1930 

IF 

K- 5 THEN 

2 510 : R EM - 

- afierctear 

1940 

IF 

K - 7 THEN 

2 9 9 0 : REM - 

- KM t 

1950 

IF 

K - 6 THEN 

28 30 : REM - 

- lOfrima 

I960 

IF 

K - 2 THEN 

2870 : REM - 

- I 0 frf*ia 

1970 

IF 

K '■ 8 THEN 

2 2 4 0 : REM - 

— ixtmik 

1980 

IF 

K - 9 THEN 

2 7 4 0 : REM 


1990 

IF 

K* 10 THEN 

2630 : REM 

- joint 

2000 

IF 

K 1 1 THEN 

1O00.-REM 

- - x an 

2010 

IF 

K- 1 2 THEN 
Y E - Y R : X - 1 

FOR Z YR 
: GOTO 1040 

TO YE :w$ (PG,Z) " “:NEXT: 

2 O20 

IF 

K - 13 THEN 

X-l : Y-Y+ 1 

: YR-YR+1 

20 30 

IF 

K - 1 6 THEN 

1850:REM 

- - P? #c 

204 0 

IF 

K- 18 THEN 

2 310:REM 


20 50 

IF 

K- 1 7 THEN 

2110:REM 

-Id# 

2060 

IF 

K- 2 3 THEN 

4720:REM 

- TEXT-BOX 

20 70 

IF 

K - 2 4 THEN 

30 7 0:REM 

- Unit of Sentence / INDEX 

2080 

IF 

K- l 9 THEN 

2 680 : REM 

- Separate 

2 0 9 0 
2100 

IF K- 2 7 THEN 
GOTO 1560 

6 7 0 :REM - 

- escape 


2 110 REM . Id ^ iSUK : 

2120 LOCATE 0,21:P RI NT CHR$(26): 

2130 FOR Z%-0 TO 1 5:GO SUB 22 30 :NEXT:ZX-0 
2140 CREV 1 : GO SU B 2230 
2150 KS-INKEYS:IF KS-"' THEN 2150 
2160 CREV 0:GO SUB 2230 

2170 IF K $ -CH R $ (2 9) THEN Z*-Z*-l:IF ZJK<0 THEN MKx-MKx-16:Z*-15 ELSE 2140 

2180 IF KS-CHRS (28) THEN ZS-ZS+IMF Z%>15 THEN MK* - M K%* 1 6 : lx - 0 ELSE 2140 

2190 IF KS-CHRS (30) THEN MK*-MK%--16 
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I- • EDIT (XStt* • &i!6) 

• load (x»M*aa) 

•SAVE 

• PRINT (XSWJ) 

• DELETE C£*8lM) 

• MERGE (X*^lic) 

- • The END 


mm t: *UW !£;£ ffi © f - TV $ 

Hit. 

• XtFD K'^T 

• lfr©**©*?]® (****40*) 

•ft* (*R«cL) 
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t ^SiiS* s a (4oTLii'i t ©t", 
^rtf^EKXfc £ li loo £<•' 
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2200 IF KS-CHRS (31) THEN MK*-MK**16 

2210 IF KS-CHRS(13) THEN MX*-UK**Z*:K*-CHS*<MK*):GOTO 1740 

2220 GOTO 2110 

2230 LOCATE Z*«4,21:PR I NT CHRS<HK**Z*1 :RETURN 

2240 REM . 1 SC. T ffl B 

2250 «$-«$(PG,YR) 

2260 KS-UIDS(«$,X,1) :K-ASC (KS) 

2270 IF (K>AH7F AND K<»HA6) OR K>AHDF THEN KJ-HID*(**,X, 2) 

2280 »$-LEFTS (Its. X- 1) *M I DS (N$, X*LEN (KS) , XH) 

2290 Its (PG, YR) -NS 

2306 GOTO 1850 

2310 REM ---------- 

2320 WS-WS (PG,YR) 

2336 WS-LEFTS (WS,X- 1)+" '+ M I DS (WS, X, XM) 

2340 X-X-l 

2350 GOTO 1770 

2360 sub - 1 ft » A 

2370 FOR Z-YE TO YR STEP -1 

2380 WS (PG, Z+ 1) -WS (PG, Z) 

2390 NEXT Z 

2-400 YE-YE+ 1 : I F YE>YM THEN YE-YM 

2410 WS (PG, YR) — “ ** s X — 1 

2420 RETURN 

2439 REM ----. 1 HI fifc 

2440 Y0-YR:Y1 -YR 

2450 FOR Z-YR TO YE-1 

2460 WS (PG,Z) -WS (PG,Z+1) 

2470 NEXT Z 

2480 W* (PG,YE) 

2496 YE-YE-1: I F Y E<1 THEN YE - 1 

2 500 X - 1:GOTO 1040 

2510 REM -. T7?-?'JT; 

2520 W$ (PG, YR) -LEFTS (WS (PG, YR) , X- 1) 

2530 LOCATE 0,Y 

2 540 PRINT #3, LEFTS((W$(PG,YR)+SPACES (XM)),XM) ; 

2550 LOCATE X,Y 

2560 GOTO 1290 

2570 REM -. 1 i ^ t - 

2580 WS-WS (PG,YR)+SPACES(80) 

2590 W$ (PG, YR) - LEFTS (WS,X-1) + M 1 D S (W $ (P G, YR - 1 ) , X, 2 5 5) 

260 0 COLOR 6:L0CATE X-1.Y:PR I NT #3,MIDS (WS (PG,YR- 1 ) ,X, 255) 

2610 COLOR 5:LOCATE X-1,Y:PR1NT «3,M1DS (WS (PG,YR- 1),X, 255) 

2620 GOTO 1290 

2630 REM . ftWfj t A *£ 

2640 WS-WS (PG,YR)+WS(PG,YR+1) 

26 50 WS(PG, YR)-LEFTS(WS,XM) 

2660 WS(PG, YR♦1)-MIDS(WS, XM + 1,255) 

2670 GOTO 1040 

2680 REM . J] - >V \k$L '<T 

2698 WS-WS (PG,YR) 

27 00 WS(PG,YR) -LEFTS (WS,X-1) 

2710 WS-MIDS (WS,X, 2 55) 

2720 YR-YR+1:G0SUB 2910:YR-YR-1 

2730 GOTO 1040 

2740 REM .. ? tf a U — 3 y 

2750 WS-WS(PG,YR) :W-LEN (WS) 

2766 IF X>-W THEN 1560 

2770 Z-X+l 

2780 WHILE (MIDS(WS,Z- 1, 1)<>* ') OR (MIDS (WS,Z,1)-' ') 

2790 Z-Z+ 1 : IF Z>W THEN 2810 

2800 WEND 

2810 X-Z: IF X>XM THEN X-XM 

2820 GOTO 1560 

2830 REM ---------- 10frtfjjl£ 

2840 YR-YR+10:YS-YS+ 1 0 

2850 IF YS+18>YM THEN YS-YM- 18:YR-YM:Y - 1 9 
2860 GOTO 1040 

28 7 0 REM ---------- 10*ft£ifi 

2880 YR-YR-10:YS-YS-10 

2890 IF YR<1 THEN YR- 1 : Y- 1 : YS- 1 

2900 GOTO 1040 

29 10 sub ---------- X ¥ ft k * tZ t $ <T> ■* -? )V - > 

2926 ZY-YR 

29 30 IF LEFTS (WS (PG, ZY) , 1) ' “ ' THEN YY YR : YR-ZY : GOSUB 2360 : YR-YY 
29 4 0 ZWS-WS + WS (PG,ZY) 

2950 WS (PG,ZY) -LEFTS (ZWS,XM) 

2960 WS-MIDS (ZW$,XMM, 25 5) 

2970 IF W$“"“ THEN RETURN 

2980 ZY-ZY < 1:GOTO 2930 

29 9 0 REM .. fr |»| t 

3000 FOR Z-l TO YE-1 

3010 IF LEFTS (WS (PG.Z+1) , 1) -' “ THEN 3050 

30 20 WS-WS (PG,Z) +WS (PG.ZM) 

30 30 WS (PG, Z) -LEFTS (WS, XM) 

30 4 0 WS (PG, Z+ 1) -MIDS (WS, XM* 1 , 2 5 5) 

3050 NEXT Z 

3060 GOTO 1040 

3O70 REM ---- S u p e r f] y h & ^ ^ h 

30 8 0 Y0-YR:Y1-YR: Y0:fS Y1 :ft ^ ft 

3090 YB-Y:YRB-YR:YSB-YS 

3108 GOSUB 1100 

3110 CREV 0:COLOR 5 

3120 FOR Z-l TO 19:ZY-YS+Z-1 

3130 IF (ZY>-Y0) *(ZY<-Y1) THEN CREV 1:C0L0R 6:L0CATE 0,Z:PRINT TAB(XM) ; 

3140 LOCATE 0,Z:PRINT #3,W$ (PG,ZY) ; 

3150 CREV 0:COLOR 5 

3160 NEXT 

3170 LOCATE 0.21:PRINT CHRS (26) ; “ i - M : " X;YR 

3180 KS-INKEYS:IF KS-" THEN 3180 

3190 IF YE<YR THEN YE-YR 

3200 K-ASC(KS) 

3216 IF K- 13 THEN 3390 

3220 IF (K< 30) OR (K> 31) THEN 3180 

3230 IF K-UP THEN 

324 0 IF YR-Y0 THEN PRINT CHRS (7) ;:GOTO 3180 
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[FI] t'U/n—7^- A* 

[F 2 ] tM^* ? 4‘/t*tt 

[F 5 ] A* 1/2 CM ot'U/ii til 1-K%i 

[tt] *“4/3t3&'4 : 

[LOCK] -kXf/'I'Xf 
tCMTi'it. $ liCCOli*•(:{, [F 
10 ] 41ft!:, itmli Ati L tzXf&l&W 
XtrC^ bUZomtlei ix.Ti'it* 1 , 
f¥ L < (i MZ-2500CD■»- a7 ^fc#!!« L f 
< Wi'. 

S44MMM6 

li 4 #|D]<7)-Xtpt—f, ±T££<:ijj|! S 
f*4-* { f.a®li±Ti:x^a-^L it. 
-Tli3-11 com- ^ a l t:SMffi 

t IftBH L i L j: 9 „ 

• i : [ctrl] + [d] 

• 1 X^#A : [INST] 

•loftffijl: [F7] IA it 

[CTRL] + [F] 

•loftf&i: [f 8 ] ifctt 

[CTRL] + [B] 

• : [HOME] 

MA'OX®5U^7 —y^#flj: [TAB] 

• *-y;KOA©ac[f : [CR] 

• l frit A : [Fi] ifctt 

[CTRL] + [A] 

• ltfSMfc: [F 2 ] 4fctt 

[CTRL] + [V] 

• l ft«¥ : [F 3 ] ifctt 

[CTRL] + [C] 

•Tft**£: [F 4 ] ifctt 

[CTRL] + [J] 

• * - y A'lmsfcoescfr : [F 5 ] it: it 

[CTRL] + [S] 

• r 7^-y;r: [ctrl] + [e] 

(j&-y**fl0*=J8W»||!M 

• 7 ytf—9 ') 7 : [CLR] 

&^<-X h 

jfctSuper {,0*‘& < A£0#Sc©Cfiog 

t < soft. 

i *? 0 ft, 

\) [CTRL] + [X] it: it [F 6 ] 4# 

to 

to ±T^*--ri5B5rJkl fT*»c.'; 

Lit, 

3) ts 

C ;*’£#$*■»#? IT •; 
Lit. 

y y - i — i:gf§ l fcISMgliJU 

TO 7 oft. 

• $ 6 fitf A : M HffiB fcIs] e & $ © ft t 


3250 LOCATE 8,Y:PRINT TAB (XM) ; 

3260 LOCATE 0,Y:PRINT #3,W$(PG,YR) 

32 7 0 Y-Y-UYR-YR 1 : Y 1 - Y 1 - 1 

3280 IF Y<1 THEN YS-YS-1:Y- 1:GOTO 3100 

3290 END IF 

3300 IF K<>DN THEN 3170 

3310 Y-Y+1 :YR-YR+1:Yl-YR 

3320 IF YR>YM THEN Y- 19:YS-YM- 1 8:YR-YM 

3330 IF Y>19 THEN Y- 19:YS-YS+10:YR-YR+9:Y 1 -YR:GOTO 3100 

3340 CREV 1:COLOR 6 

3350 LOCATE 0,Y:PR I NT TAB(XM) ; 

3360 LOCATE 0.Y:PR I NT #3, W$ (PG,YR) ; 

3370 CREV 0 : COLOR 5 

3380 GOTO 3170 

3390 REU - 

3400 CONSOLE 0,9,0,15 

3410 Yl-YR 

3420 Y-YB:YS-YSB:YR-YRB 

34 30 COLOR 2s CREV 1 

344 0 LOCATE 0,0:PRINT “ * JOB MENU * ";CHRS (26) 

3450 COLOR 7 

3460 FOR Z-l TO 7 

3470 LOCATE 0,Z:GOSUB 3580 

3480 NEXT Z 

3490 COLOR 2 

3500 LOCATE 0,8:PRINT ’ [ SPACE ]jg ft*5 
3510 COLOR 7:Z- 1 

3520 CREV 0:L0CATE 0,Z:GOSUB 3580 

3530 K$-INKEYS:IF K$-*" THEN 3530 

354 0 IF K$-CHR$ (13) THEN 3660 

3550 CREV 1 .’LOCATE 0,Z:GOSUB 3580 

3560 Z-Z+l : IF Z>7 THEN Z-l 

3570 GOTO 3520 

3580 ON Z GOSUB 3590,3600,3610,3626,3630,3640,3650:RETURN 


3590 

PRINT ' 

2 & ff ft A 

■ ; : RETURN 

3600 

PRINT ' 

HO 0 t 0 

*;:RETURN 

3610 

PRINT ' 

(i 0 O (t 

";:RETURN 

3620 

PRINT ' 

% t t 0 

‘ ; .-RETURN 

3630 

PRINT ' 

SAVE 

“ ; : RETURN 

3640 

PRINT ' 

MERGE 

' : :RETURN 

3650 

PRINT ' 

t 0 * 

';:RETURN 

3660 

CONSOLE 0, 

24,0,80 


3670 

ON Z GOTO 

3760,3890,3990, 

,4100,4120 

3680 

GOTO 1000 




3690 REM 

37 0 0 REU *.. BAFA'S COPY: Y fr L> Y Iff i t £ fc 0 C tf 

3710 FOR Z-Y0 TO Y1 

3720 BAFAS (Z-Y0+ 1) -W$ (PG, Z) 

3730 NEXT Z 

3740 LBAFA-Y1-Y0+ 1 

3750 RETURN 

3760 REM .----- f|l A I 

3770 GOSUB 3780:GOTO 1040 

3780 LINST-Y1 Y0+1 

3790 FOR Z-YE TO Y0 STEP -1 

3800 IF Z + LIN ST>YM THEN 3820 

3810 W$(PG,Z*-LINST) -W$ (PG, Z) 

3820 NEXT Z 

3830 FOR Z-Y0 TO Y1 

3840 IF Z>YM THEN 3870 

3850 WS(PG,Z)-" 

3860 NEXT 

3870 YE-YE+LINST:IF YE>YM THEN YE-YM 

3880 RETURN 

3890 REM -.. CUT; 

3900 GOSUB 3700 

3910 FOR Z-Y0 TO YELBAFA 

3920 N$ (PG, Z) -W$ (PG. Z + LBAFA) 

3930 NEXT Z 

394 0 FOR Z-YE-LBAFA+ 1 TO YE 

3950 W$ (PG, Z) - ' ” 

3960 NEXT 

3970 YE-YELBAFA 

3980 GOTO 1040 

3990 REM.^ — X h* ; 

4000 IF Z-0 THEN 1040 

4010 LINST-LBAFA:IF L I H ST-0 THEN 1040 

4020 Y0-YR:Y1-Y0+LBAFA-1 

4030 GOSUB 3790 

4040 FOR Z-Y0 TO Y1 

4050 IF Z>YM THEN 4080 

4 06 0 W$(PG,Z)-BAFAS (Z-Y0 + 1) 

4070 NEXT Z 

4080 IF YE>YM THEN YE-YM 

4090 GOTO 1040 

4100 REM . COPY; 

4110 GOSUB 3700:GOTO 104O 

4120 REM . LOCAL SAVE; 

4130 COLOR 4 : CREV l:L0CATE 18,5:PRINT 

4140 COLOR 7 : CREV 1 

4150 FOR Z-l TO 3 

4160 ON Z GOSUB 4270,4280,4290 

4170 NEXT:Z-3 

4188 COLOR 4:LOCATE 18,9:PRINT ' ANY-SELECT/ [CR] : ifc £ ' 

4190 COLOR 7 

4288 CREV 0:ON Z GOSUB 4270,4280,4290 

4210 Zi-lNKEY$:lF ZS-" THEN 4210 

4220 IP ZS-CHRS(13) THEN 4260 

4230 CREV 1:ON Z GOSUB 4270,4280,4290 

4240 Z-Z+ 1:IF Z>3 THEN Z-l 

4258 GOTO 4190 

4260 ON Z GOTO 4470,4300,1048 

4270 LOCATE 1 8,6 : PR IKT ' D I SR-F I LEC ";:RETURN 

4280 LOCATE 18,7:PRINT * TEXT-BOX £ ' ; : RETURN 

4290 LOCATE 18,8:PRIHT t 0 + *> "S: RETURN 
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• ¥L t 6 : ttft(SH«rlW»*r. * -y b 
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• SAVE : tmfgffltnt irW 0 m L T, 
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— Il-fc —7*L £ -to 
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h SX^cSrif A l i 1\ 

• t •) V>«b : fMg+it 
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t')j t r li*)otfj £HlAA-t>-ttS c i 

tr^-rtc 

X + X b #-y 

WM [CTRL] + [X] tAlt[F6] tT 
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[SAVE] L iz<D t>, [TEXT- 

BOX MENU] ^SA.r'10[iO4ll> 
,T,l©7t>, III'-hKlZbr')?- 
>A— *ff l it, 

*'-y ^X|*Ji8j| [CTRL] + [W] t L 
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ENU] 5fSA.iri0[iO4l § ill L co 7 
t>, ifs 4-1 ^ ^-c; 
fftit. ztixr r ^<on^jSiHj 
■Ccommr. A 1 ) it. STLLC,# 

[CTRL] + [W] £ L‘ It [F10] 

tr-r. 

7 7 7.ft £ gcD-7 - [F6] i t: It [ C 

TRL] + [X] tT-bP Attain* L A 
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4360 

4316 
4326 
4336 
4346 
4356 
4366 
4376 
4386 
4396 
4466 
4416 
4426 
4436 
4446 
4456 
4466 
4476 
4486 
4496 
4566 
4516 
4526 
4536 
4546 
4556 
4566 
4576 
4586 
4596 
4666 
4616 
4626 
4636 
4646 
4656 
4666 
4676 
4686 
4696 
'4768 
4716 
47 28 
4736 
4746 
4758 
4 768 
47 7 8 
4788 
47 98 
4886 
4816 
4828 
4836 
4846 
4856 
4866 
4 8 7 0 
4880 
4890 
4 9 0 0 
49 10 
4 92 0 
4 9 30 
4 9 4 0 
4 9 5 0 
49 66 
4 9 7 0 
4986 

4 9 9 0 

5 8 6 0 
56 1 6 
5620 
5036 
504 6 
5 6 5 6 
5 0 6 0 
5076 
5080 
5 8 9 6 
5166 
5116 
5 120 
5136 
5146 
5150 
5160 
5170 
5180 
5190 
5260 
5218 
5226 
5236 
524 6 
5256 
5260 
5276 
5280 
5296 
5366 
5316 
5326 
5336 
5346 


REM.TEXT-BOX (C ft & ; 

IF Y1-Y0+1<-VM THEN 4356 
COLOR 6 : LOCATE 6,22 

PRINT * ! ! ! ! “ 

FOR Z-l TO 999:NEXT: CREV 0:GOTO 1646 
COLOR 6 : LOCATE 0,22 

PRINT'# \Z <D *7 4 < [CR] £ ) ': 

G0SUB 4896 
FOR Z-Y0 TO Y1 

IF Y1-Y6>56 THEN 3810 
VS (WN, Z-Y6+1) -WS (PG, Z) 

NEXT Z 

COLOR 6 : CREV 6 

LOCATE 6,22:PRINT CHR$(26) : 

INPUT '# £ £ MR L tt * ? (Y/N) : ', AN SS 

IP ANSS-'Y' OR ANSS-'y' OR ANSS-'Y' OR ANSS-'y' THEN 3896 
GOTO 1640 

REH . 7 4 - IV V 7 T 4 tl <T> 4 A : 

COLOR 6 : LOCATE 0,21 

PRINT CHRS (5) ;*# c<o##*Mt<07r>f/i'fc'7<9±'f. ' 

PRINT CHRS (5) ; : INPUT ' 7 T 4 ll £ tt ( [ . ] *C t 0 + *> ) *.ANSS 

IF ANSS-" OR ANSS-'.' OR ANSS-'. ' THEN 1040 
ON ERROR GOTO 4590 
OPEN 'O',tl,ANSS 
FOR Z-Y0 TO Y1 

PRINT #1,WS(PG,Z) 

NEXT Z 
CLOSE #1 
GOTO 4426 

IF ERR-42 AND ERL-5610 THEN KILL FS:GOTO 4526 

STOP 

REH . LOCAL MERGE ; 

IF PG<>0 THEN 4810 
COLOR 6:LOCATE 6,22 

PRINT '# ( [CR] : ft £ ) ' 

GOSUB 4898 

FOR Z-50 TO 1 STEP -1 

IF VS(WN,Z)<>" THEN 4690 
NEXT 

Y1-Y0+Z:GOSUB 3780 

FOR ZZ-1 TO Y 1 -Y0:WS (PG,Y0 + ZZ-1)-VS (WN,ZZ) :NEXT 
GOTO 1036 

REH. TEXT-BOX ; 

IF PG<>0 THEN 4810 
COLOR 6 : LOCATE 6,22 

PRINT'# ifiOBOXia^ifift*? ( [CR]:jfcg [ESC] : t 0 * #> ) 
GOSUB 4896 
PG- 1 

FOR Z-l TO 50:WS (PG,Z)-VS(WN,Z) :NEXT 
FOR Z-l TO 50:VS (WN,Z)- " :NEXT 
GOTO 1000 

REM . 

COLOR 6 : LOCATE 0,22 

PRINT'# If^BOXCRf ( [CR] : ft £ ) “ 

GOSUB 4890 

FOR Z-l TO 50:VS (WN,Z)-fS(PG,Z) :NEXT 
FOR Z-l TO YM:W$ (PG, Z) -" :NEXT 
PG - 0 

GOTO 1000 

• sub - B O X - L I ST 

CREV 1 : COLOR 4 

LOCATE 0,9:PRI NT TAB(10) : 

PRINT '• O • TEXT-BOX MENU # O • " : SPC (32) ; 

CREV 0 : COLOR 7 
FOR Z-l TO 10 

LOCATE 0,9 + Z:PR I NT CHRS (5) ;VS (Z, 1) ! 

NEXT Z 

COLOR 4 : CREV 1 

LOCATE 8,20:PRI NT SPACES (80) ; 

WN - 1:COLOR 7 
CREV 1 

LOCATE 0,9 + WN:PRlNT CHRS (5) ; VS (WN, 1) 

WNS-INKEYS:IF WNS-" THEN 5020 
IF WNS-CHRS (13) THEN RETURN 
IF WNS-CHRS (27) THEN RETURN 
CREV 8 

LOCATE 0,9 +WN:PR I NT CHRS (5) 5 VS (WN, 1) 5 
WN-WN +1:IF WN> 1 0 THEN WN-1 
GOTO 5600 

REM . LOADING: 

DFS-" s FS- " : ANSS- '" 

CHDIR:CL S 
CREV 1 : COLOR 5 

PRINT CHRS (5) ; ' <<< LOADING >>>’ 

CONSOLE 1,23 
CREV 0 : COLOR 7 
FILES 

CREV 1 : COLOR 5 
PRINT CHRS (5) 

CREV 0:COLOR 7 

PR1NT:PRINT:INPUT '# input FILE NAME ( [B] tck/ [C] • nce 1) :';FS 
IF (FS-'B') OR (FS-'b') THEN 5156 
IF (FS-'C) OR (FS-'c') THEN 5496 


PR I NT: I NPUT ft fi F I LET t /)' (Y/N) : ' ; ANSS 

IF ANSS-'Y" OR ANSS-"Y ' THEN 
CHDIR FS 

CLS:PR I NT '-DIR:':FS:'-' 

PRINT:FILES 


DFS-DFS+'/"+FS+"/' 

GOTO 5206 
END IF 
FS-DFS+FS 

PRINT : INPUT ' V* < o DATA£ « A t If L & f (Y/N):';ANSS 

OPEN ' I ",# 1,FS 

IF (AN SS<>' y') AND (ANSSo'Y') THEN 5466 


Super b <r> £'£< ^ 75 
























c HtfiMcD MiBStsMt' 


TEXT-BOX MENU Hit 

COX', -?-•>*+ i £¥£itJK L X < 
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MZ-2500fflHi£ 'y-X > > -V ^ 7 7 4 ^ 
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* > y 7 h -C'^fiSt L fc k L fc 

Xl&RlfZito i> *> ^>/l Super 

& <£>*■£ < A.t'f'W L fcXIFz 7 4 Miffc 
©^7FT'-C"|,iUt 0 
o-KV-t-^V^-^/r" 1 ; - [ t fcM 

S63K0Sf^C4-5-Ci.'ii'<7)-T', 7° n ^ 5 

a® ) h f •) »:**t5*eALfc 
*>, LTi'^T < 

KIT, T4SUI' < o*>i£i;*5f?iJieL-c 

AiTo 

• ®lir^ ^ h y L T (.' t to 
1*)^'t li*SW-11:77^5?! t 
^-CffJSLT < //Si'. 

S'J© K x 4 7"£Ix£1" 4 t & i: li l : ~ 
<DX 7 i:f$lt < //Si'. 

x 7 l/:: *b. 

iI-o-c(^t-«t'ti 5 , i//—aw:'* 
mSoti'Ji'UtiHA {>14, 

C i L A: t S tt, MUR& <, [S 
HIFT] + [BREAK] kWlX^MlX 
GOTO 1000 [CR] 

t Art IT < //$ i'. i'*>4‘ SttiJir 4 HI 
flS-t/4 : i¥X ‘S i to X*7 7'(A''p 
tA-x h-rt'-x^xfi!>|*|5sWi^£t:ffc®Sft 
Ti'il’OT'cr $*&$:. 

* * * 
:©7'n/5 Aii^Tfi^UXl turbot: 4 

WJfsmzxiit) *> i-a-A,. aft®**# 
li&«LT*Ttti'* > a*T'l i 7 *>. 
i 4TfJ@'l«fig4 £ ill'SB#**/; < $ A* •) 
£T 0 fig#, 

< T^tTT* 5 ', y°o x"7 a gf^ii 
Xfo 0, BASICT'tti'Trt 1 i t®T, A 
4 $ A 4 |t ® **>'* 4 i L A C>, t" 
L E Ifflffi&itlX < ASi', T'li, - l> 
tf A J: 5. 


5356 
5366 
5376 
5386 
5396 
5466 
5416 
5426 
5436 
54 4 0 
5 4 56 
54 60 
5 4 7 0 
5480 
54 90 
5 5 0 0 
5510 
5520 
5536 
554 0 

5 5 5 6 
5566 
5576 
5586 
5596 
5666 
5616 
5626 

56 36 
564 6 
5656 
5666 
5670 
5686 
5696 

57 66 
5718 
5728 
5736 
5746 
5750 
5766 
5770 
5786 
5796 
5866 
5810 
5826 
5836 
5846 
5856 
5886 
5870 
5880 
5890 
5966 
5916 
5926 
5930 
5946 
5956 
5966 
5970 
5980 
5990 
6000 
6616 
6020 
6030 
6040 
6650 
6060 
6676 
6680 
6090 
6100 
6116 
6120 
6136 
6146 
6156 
6166 
6170 
6186 
6190 
6206 
6218 
6226 
6236 
6246 
6256 
6260 
6270 
6286 
6290 
6360 
6316 
6326 
6330 
6340 
6356 

6 360 
6376 
6386 
6390 
6400 


input ' m mm * t If L i t /)' *- ;DD 

FOR Y-l TO DD 

IF EOF (1) THEN PRINT ** 2ft A £ l r - 9 ** 7 ' : GOTO 5480 
LINE INPUT #1,WS 
NEXT Y 

FOR Y-l TO YM 

IF EOF (1) THEN 5486 
LINE INPUT #1,WS:W-LEN(WS) 

IF W<-XM THEN WS (PG,Y)-WS:G0T0 5470 
WS (PG, Y) -LEFTS (WS, XM) 

WS-MIDS (WS.XM+ 1 , 2 5 5) : W - LEN (If S) 

Y-Y+l:G0T0 5430 

NEXT Y 

CLOSE #l:YZ-Y 
CONSOLE 0,2 4:GOTO 6 7 0 

REM . SAVING; 

ON ERROR GOTO 5670 
CLS : CREV 1 : COLOR 5 

PRINT CHRS (5) :" <<< SAVE > > > * 

CREV 0:COLOR 7 

LOCATE 0,3:P RI NT * input FILE NAME (/DIR NAME/ + ) ((.]-c s1) : ' 
LOCATE 2,4:PR I NT FS 
LOCATE 6,4: INPUT ANSS 
IF ANSS-".' THEN 676 
FS-FES+ANSS 
G0SUB 1240 
OPEN " 0 *, # 1, F S 

FOR Y-l TO YE 

PRINT «1,WS(PG,Y) 

NEXT Y 
CLOSE #1 
GOTO 670 

IF ERR - 4 2 AND ERL-5610 THEN KILL FS: GOTO 5610 
STOP 

REM. Print; 

G0SUB 1240 
CLS 

CREV 1: COLOR 5 

PRINT CHRS (5) ;' <<< £ * ® 9\ >>>' 

rppu q • rm hr ? 

PR I NT: PR I NT ** d (T> £ * <T> & $ tt * *. YE ; 'ft b 0 t t . ' 

LOCATE 21,5:PR I NT "1' 

LOCATE 0,5: INPUT '* Print fro. Line No.',YS 
LOCATE 2 0,7:PR I NT YE 

LOCATE 0,7:1NPUT " to Line No.*,YE 

LOCATE 0,9:INPUT " TAB& £ (0-80):',PTAB 

LOCATE 0,11: INPUT **S(«/ 1) :',HABAS 
IF HABAS-" THEN HABAS-*0' 

IF HABAto'l* AND HABAS<>*0* THEN 5810 
CREV 1: COLOR 5 
LOCATE 0,13:PR 1 NT CHRS (5) 

CREV 0:COLOR 7 

LOCATE 0, 15:INPUT '# I printing, OK (Y/N/E) : ' ; ANSS 
IF ANSS-'n* OR ANSS-*N* THEN 5770 
IF ANSS-'e* OR ANSS-'E* THEN 670 
FOR Y-YS TO YE 

LPRINT SPACES (PTAB) 5WS (PG,Y) 

IF HABAS-'l* THEN LPRINT 
NEXT Y 
GOTO 670 


REM. DELETING; 

CLS 

LOCATE 5,1: PR I NT DELETING 

PRINT:FILES 

PR I NT: PR I NT: I NPUT '# ffl ft -f l y T 4 IV ^ tt (Qu i t-(.])*: FS 
IF FS-".* THEN 678 
PRINT 

PRINT "* Now I *■ deleting File ";FS;"'" 

INPUT' (Y/N) s' ; ANSS 

IF (AN S So ' y ') AND (ANSSo'Y*) THEN 671 
KILL FS 
GOTO 870 


REM. M E R G I N G ; 

CLS:COLOR 5:CREV 1 

PRINT CHRS (5) ; TAB (1 •) ;'< < MERGE >>' 

COLOR 7:CREV • 

ZL-1 

FOR Z-YE-4 TO YE:IF Z<1 THEN 6150 
LOCATE 0,ZL:PR I NT WS(PG,Z) 

ZL-ZL+1 
NEXT Z 

LOCATE 0,6 : PR I NT STRINGS (88,’-*) 

LOCATE 9, 9 : P R I NT "<<< merging file >»' 

CONSOLE 16,14 

FILES:PRINT:C0NS0LE 6,24 

COLOR 6:LOCATE 0,1:PRINT CHRS (5) ; 

INPUT*# 774)1%!* (esc-[.]):*, FZS 
COLOR 7 

IF FZS-'.' THEN 6480 
LOCATE 0,7 : PRI NT CHRS (26) 

OPEN 'l',#l,FZS 
FOR Z-l TO 10 

IF EOF (1) THEN 6380 
LINE INPUT #1,WS 
LOCATE 0,7+Z:PRINT WS 
NEXT Z:CL0SE #1 
COLOR 6 

LOCATE 0, 20: INPUT *# OKTtA 1 ? (»g» i n-[.]):', ANSS 
IF ANSS-'.' THEN 6180 
OPEN "I",SI,FZS 

FOR Z-ZZ+1 TO YM 

IF EOF (1) THEN 6390 
LINE INPUT #1,WS (PG,Z) 

NEXT Z 

CLOSE SI : YE-Z 
CONSOLE 0,24:GOTO 670 
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y * h 


y 


-x<j 


x h 




.PHASE 

0BA00H 

BA8B 

5A 

0PBN2: 

LD 

0330 


QBREAK EQU 

0330H 




•PARITY 


1FCA 


BBRBAK EQU 

1FCAH 

BA8C 

7K 



LD 





BA8D 

23 



INC 

1F98 


ZSIO EQU 

1F98H {IF NOT,1F90H 

BA8B 

16 00 



LD 

1FA8 


ZCTC BQU 

1FA8H {IF NOT,1FA0H 

BA90 

FB 4B 



CP 



; 


BA92 

28 0B 



JR 

005C 


INTRSV BQU 

5CH {INT VECTOR 

BA94 

14 



INC 

0040 


QMAX BQU 

64 {QUB SIZB 

BA95 

FB 4F 



CP 

0080 


QMAXX BQU 

QMAX+64 ;Q SIZB+ALPHA 

BA97 

28 06 



JR 



; 


BA99 

14 



INC 

000D 


CR BQU 

0DH 

BA9A 

FB 45 



CP 

000A 


LF BQU 

0AH 

BA9C 

C2 BB26 



JP 

000B 


SO BQU 

0BH 

BA9F 

7B 

OPBN3: 

LD 

000F 


SI EQU 

0FH 

EAA0 

B2 



OR 

8011 


XON BQU 

11H 

EAA1 

5F 



LD 

0013 


XOPF BQU 

13H {CTRL CODBS 








; 





; DBTA BIT LBN 



;BAU RATB 

0-6 

EAA2 

7B 



LD 



.PARITY 

B ,0, N 

BAA3 

23 



INC 



;DATA BIT LBN 

5,6,7,8 

BAA4 

D6 35 



SUB 



;STOP BIT LBN 

1.2,3 

BAA6 

DA BB26 



JP 



;CONTROLB 

X,R,N, MH 

BAA9 

FB 04 



CP 



;KANA MODB 

S,N," M 

BAAB 

D2 BB26 



JP 



;CR,LF SBND 

C.L,"" 




; A=0-3 




;CR(LF RBCBIVB 

C,L, H " 

BAAB 

PS 



PUSH 



;KANJI 

J,N," " {DUMMY 

BAAF 

16 B0 



LD 



;BND CODE 

jpARAMS 

EAB1 

B7 



OR 



; 


BAB2 

28 05 



JR 



-.JUMP TABLB 


EAB4 

CB 22 

MLOOP: 

SLA 

BA00 

C3 BAIB 

JP 

OPBN ;+0 

EAB6 

3D 



DBC 



;I,0 or C ♦ PARAMBTBR 

BAB7 

20 FB 



JR 

BA03 

C3 BB84 

JP 

CL08E {+3 








;TX BNDCODB 


EAB9 

7A 

OPEN35: 

LD 



; 


EABA 

2F 



CPL 

BA06 

C3 BCDD 

JP 

LINPUT {+6 

BABB 

32 BB61 



LD 



{UNTIL CR <*LP) 


BABB 

FI 



POP 

BA09 

C3 BD35 

JP 

INPUTN {+9 

EABF 

B7 



OR 



{INPUT n CHAR 


EAC0 

BA EAC5 



JP 



; 


EAC3 

EE 03 



XOR 

BA0C 

C3 BD68 

JP 

PRINTS {+12 

EAC5 

0F 

0PEN4: 

RRCA 



;TX STRING 


EAC6 

0F 



RRCA 

BA0F 

C3 ED56 

JP 

PRINT {+16 

BAC7 

F6 01 



OR 



{TX STRING ♦ CR 

(+LF) 

BAC9 

32 EE5A 



LD 



; 


BACC 

0F 



RRCA 

BA12 

C3 EB98 

JP 

LOC {+18 

EACD 

F6 80 



OR 



{RETURN BUFF SIZB 

EACF 

F6 02 



OR 

BA15 

C3 EBB9 

JP 

BOF {*21 

EAD1 

F8 08 



OR 



{EOF OR NOT 


BAD3 

32 BB54 



LD 

BA 18 

C3 BC9A 

JP 

PGBTC1 {^24 




; STOP BIT LEN 



{RIMITIVB OET CHAR 

BAD 6 

7B 



LD 

BA IB 

C3 BD90 

JP 

PPUTC1 {+27 

BAD7 

23 



INC 



{PRIMITIVE PUT CHAR 

BADS 

D6 31 



SUB 



; 


BADA 

DA BE26 



JP 

BA IB 

3A EB60 

OPEN: LD 

A, (OPENF) 

BADD 

FE 03 



CP 

EA21 

B7 

OR 

A 

EADF 

D2 BB26 



JP 

BA22 

28 07 

JR 

Z,OPENQO 

BAB 2 

3C 



INC 



; 


BAB3 

87 



ADD 



{REOPEN THEN CLOSE 

BAE4 

87 



ADD 

EA24 

D5 

PUSH 

DE 

BAB5 

B3 



OR 

EA25 

C5 

PUSH 

BC 

BAB 6 

32 BB52 



LD 

EA26 

CD EB84 

CALL 

CLOSB 






EA29 

Cl 

POP 

BC 




CONTROLB 

EA2A 

D1 

POP 

DE 




KANA MODB 



; 





CR,LF 

SBND 

EA2B 

3E FF 

OPENQO: LD 

A.0FFH 




CR, LF 

RBCBIVB 

EA2D 

32 EE60 

LD 

(OPENF),A {SET FLAG 




KANJI 




{ 





BND CODE 

EA30 

3D 

OPENW: DEC 

A 






EA31 

20 FD 

JR 

NZ,OPENW {WAIT 

BAB9 

C5 



PUSH 



; 


BABA 

B5 



PUSH 

EA33 

F3 

DI 


BABB 

21 BB3F 



LD 

EA34 

21 EBC6 

LD 

HL,INTRSR 

BABB 

11 BB4 5 



LD 

EA37 

22 005C 

LD 

(INTRSV),HL 

BAF1 

01 0006 



LD 

EA3A 

FB 

BI 

{SET VECTOR 

BAF4 

BD BO 



LDIR 



{ 


BAF6 

BB 



EX 

EA3B 

EB 

EX 

DE,HL 

BAF7 

D9 



BXX 

EA3C 

78 

LD 

A,B ;COPY LBN 

BAF8 

Bl 



POP 

BA3D 

B7 

OR 

A 

BAF9 

Cl 



POP 

EA3E 

CA EE26 

JP 

Z,ERR {NULL STR 

BAFA 

11 BB2F 



LD 

BA4 1 

05 

DEC 

B 

BAFD 

AF 



XOR 

EA42 

7E 

LD 

A,(HL) {1 CHAR 

BAFB 

08 



BX 

BA43 

23 

INC 

HL 

BAFP 

79 



LD 

EA44 

FE 49 

CP 

1 1 * 

BB00 

B7 



OR 

EA46 

28 0B 

JR 

Z,OPENOK 

BB01 

28 IF 



JR 

EA48 

FB 4F 

CP 

*0* 

BB03 

FB 06 



CP 

EA4A 

28 07 

JR 

Z,OPENOK 

BB05 

20 02 



JR 

BA4C 

FE 43 

CP 

• c* 

BB07 

OD 



DBC 

EA4E 

28 03 

JR 

Z,OPENOK 

BB08 

08 



BX 

EA50 

C3 EE26 

JP 

ERR 








; 


BB09 

46 

0PBN8: 

LD 

EA53 

32 EE4B 

OPENOK: LD 

(IOC),A {I,0 or C 

BB0A 

23 



INC 

EA56 

78 

LD 

A,B ;GET COUNT 

BB0B 

1A 

0PBN7: 

LD 

BA57 

D6 04 

SUB 

4 

BB0C 

13 



INC 

EA59 

DA EE26 

JP 

C.ERR 

BB0D 

B7 



OR 

EASC 

FB 07 

CP 

7 

BB0B 

CA BB26 



JP 

BASE 

D2 BB26 

JP 

NC,ERR 

BB11 

B8 



CP 

EA61 

4F 

LD 

C,A {COUNTBR 

BB12 

20 F7 



JR 

EA62 

7B 

LD 

A,(HL) 




MATCH 


BAS 3 

23 

INC 

HL 

BB14 

D9 



BXX 



; 


BB15 

12 



LD 



{BAU RATB 

0-6 

BB16 

D9 



BXX 

EA64 

D6 30 

SUB 

'0’ 

BB17 

1A 

OPBN75: 

LD 

EA66 

FE 07 

CP 

7 

BB18 

13 



INC 

EA68 

D2 BB26 

JP 

NC,ERR 

BB19 

B7 



OR 

EA6B 

16 D0 

LD 

D, 208 

BB1A 

20 FB 



JR 

EA6D 

D6 02 

SUB 

2 

BB1C 

D9 

OPENS: 

BXX 

BA6F 

F5 

PUSH 

AF 

BB1D 

13 



INC 

HA70 

30 01 

JR 

NC.OPEN0 

BB1E 

D9 



BXX 

EA72 

AF 

XOR 

A 

EB1F 

OD 



DEC 

BA73 

B7 

OPBN0: OR 

A 

BB20 

20 B7 



JR 

EA74 

28 05 

JR 

Z,OPBNl 






BA76 

CB 3A 

SRL 

D ;D=D/2 

BB22 

08 

FINIS: 

BX 

BA78 

3D 

DBC 

A 

BB23 

B7 



OR 

EA79 

18 F8 

JR 

OPEN0 

EB24 

28 10 



JR 



; 


BB26 

7B 



LD 

BA7B 

7A 

OPBNl: LD 

A,D 

EB27 

FB 40 



CP 

BA7C 

32 BB2B 

LD 

(CTR),A 

EB29 

DA BB26 



JP 



; 


EB2C 

FE 80 



CP 

BA7F 

PI 

POP 

AF 

EB2B 

D2 BE26 



JP 

BA80 

16 40 

LD 

D, 40H {*16 

EB31 

B6 IF 



AND 

BA82 

30 07 

JR 

NC,0PBN2 

EB33 

D9 



EXX 

BA84 

16 80 

LD 

D,80H ;*32 

EB34 

12 



LD 

EA86 

3C 

INC 

A 

EB35 

D9 



BXX 

BA87 

28 02 

JR 

Z,OPBN2 






BA89 

16 C0 

LD 

D,0C0H {*64 

BB36 

F3 

SETZ: 

DI 



A.(HL) 

HL 


C, ERR 
4 

NC.BRR 


D.meeeeeB 


A,D 

(MASK),A 


PE.0PBN4 
1 IB 


80H 

02H 


1.2.3 
A, (HL) 


C i ERR 
3 

NC,BRR 


A i A 
A,A 


X.R.N, 
S , N, " ” 
C,L,"" 


HL.PDPLT 
DB,PARAM 
BC, 6 


AP,AF* 

A,C 


Z, FINIS 
6 

NZ.0PBN6 


;COPY DEFAULT 
;DB’=PARAM 


{FLAG 

;A'=e 


;c=6 

;A’<>0 


B,(HL) 
HL 

A,(DB) 


(DB).A 
A,(DB) 


NZ.OPBN6 

AF.AF* 

A 

Z.SBTZ 
A, (HL) ; 
40H 
C , ERR 
80H 

NC(ERR 
1FH 


(DE),A ;STORE 


;SET ZCTC.ZSIO 


!*l*i:a2>xi 79 








EB37 CD EB6A 

EB3A 01 1FA9 

BB3D 3E 47 

EB3F ED 79 

BB41 3A BE2E 

BB44 ED 79 

EB46 21 EE4C 

EB49 01 1F99 

BB4C 3B 0F 

BB4B CD BB63 

BB51 21 BE5B 

BB54 01 1F9B 

BB57 3B 05 

BB59 CD BB63 

EB5C 3B FF 

BB5B 32 BB60 

BBS 1 FB 

BB62 C9 

BB63 04 

BB64 BD A3 

BB66 3D 

BBS7 20 FA 

BB69 C9 


CALL 

LD 

LD 

OUT 

LD 

OUT 

LD 

LD 

LD 

CALL 

LD 

LD 

LD 

CALL 

LD 

LD 

BI 

RBT 

SETSIO: INC 
OUT I 
DBC 
JR 
RBT 


INITBF 
BCiZCTC+1 
A,0100011 IB 
(C) , A 
A,(CTR) 

(C) ,A 

HL.SIOSA 
BC,ZSIO+1 
A, 15 
SETSIO 

HL.SIOSB 
BC,ZSIO+3 
A,5 

SBTSIO 
A,0FFH 
(OPENF),A 


B 


A 

NZ,SBTSIO 


;CH0 

;MODE 

;T CONSTANT 
;CH A 

;CH B 


BC11 01 1F99 

BC14 3A BB45 

BC17 FB 4B 

BC19 C8 

BC1A FB 52 

BC1C 28 11 

BC1B FB 58 

BC20 C0 

BC21 3A BB63 

BC24 B7 

BC25 CO 

BC28 3B 13 

BC28 32 BB63 

BC2B CD BD77 

BC2B C9 

BC2F 01 1F99 

BC32 3E 05 

BC34 BD 79 

BC36 3A BB54 

BC39 B6 FD 

BC3B BD 79 

BC3D C9 

BC3B 3A BE45 

BC41 FB 4B 

BC43 C8 


SWAIT: LD 

LD 


BC,ZS10+1 
A,(PARAM+0) 


CP 

RBT 

CP 

JR 

CP 

RBT 

LD 

OR 

RBT 

LD 

LD 

CALL 

SWAITl: LD ? 

LD 

OUT 

LD 

AND 

OUT 

RBT 


* N ’ 

Z ;NOTHING 

’R* 

Z,SWAITl 

a!(XFLAG) 

A 

A,XOFF ;X CTRL 
(XFLAG),A 
PPUTC0 

BC,ZSIO+1 
A,5 
(C).A 
A,(WR5+1) 

11 111 10IB ;RBS RTS 

(C), A 


SOK: LD A,(PARAM+0) 

CP *N» 

RBT Z 


BB6A AF 

BB6B 32 BB6A 

BB6B 21 BB6B 

BB71 22 BB66 

BB74 22 BB68 

BB77 32 BB62 

BB7A 32 BB63 

BB7D 32 BB64 

BB80 32 BB65 

BB83 C9 

BB84 AF 

BBSS 32 BB66 

BB88 3A BB4B 

BB8B FB 4P 

BB8D C0 

BB8B 3A BB4A 

BB91 FB 20 

BB93 C8 

BB94 CD BDCD 

BB97 C9 

BB98 3A BB6A 

BB9B 77 

BB9C 23 

BB9D 36 00 

BB9F C9 


INITBF: XOR A 

LD (QLBN),A 

LD HL,Q0 

LD (HBAD).HL 

LD (TAIL).HL 


LD (LA9TX),A 
LD (XFLAG),A 
LD (TKIN),A 

LD (RRIN),A ;RESET MODS 
RBT 


CLOSB: XOR 

LD 


A 

(OPBNF),A 


LD A,(IOC) 

CP ’O' 

RBT NZ 

LD A,(BCODB) 

CP 20H 

RBT Z 

CALL PPUTC ;TX BCODB 

RBT 


LOC: LD 

LD 
INC 
LD 
RET 


A,(QLBN) 

(HL),A 

HL 

(HL),0 ;RBT SIZE 


BC44 FB 52 

BC46 28 12 

BC48 FB 58 

BC4A CO 

BC4B 3A BE63 

BC4B B7 

BC4F C8 

BC50 AF 

BC51 32 EE63 

EC54 3E 11 

BC56 CD BD77 

EC59 C9 

EC5A 01 1F99 

BC5D 3E 05 

BC5F BD 79 

BC61 3A EE54 

BC64 F6 02 

BC66 ED 79 

EC68 C9 

BC69 CD BCA4 

BC6C 47 

BC6D 3A EE46 

BC70 FB 53 

EC72 20 24 

BC74 3A BE61 

EC77 FB 7F 

BC79 20 ID 


BBA0 3A BB6A 

BBA3 B7 

BBA4 C8 

BBA5 3A BB4A 

BBA8 FB 20 

BBAA C8 

BBAB B5 

BBAC 2A BB68 

BBAP 46 

BBB0 Bl 

BBB1 B8 

BBB2 28 02 

BBB4 AF 

BBB5 C9 

EBB6 F6 FF 

EBB8 C9 

BBB9 CD BBAO 

EBBC 11 0000 

EBBF 28 01 

BBC1 IB 

EBC2 73 

BBC3 23 

BBC4 72 

BBC5 C9 

BBC6 F3 

BBC7 F5 

BBC8 C5 

BBC9 D5 

EBCA E5 

EBCB 01 1F99 

BBCB 3K 01 

EBD0 ED 79 

EBD2 BD 78 

EBD4 0B 

EBD5 ED 78 

BBD7 2A EE66 

BBDA 77 

BBDB 23 

BBDC E5 

BBDD 01 BBBB 

BBB0 B7 

BBB1 ED 42 

BBB3 Bl 

BBB4 20 03 

BBB6 21 BB6B 

BBB9 22 EE66 

BBBC 21 BB6A 

BBBF 34 

EBF0 FB 13 

BBF2 20 05 

EBF4 32 BB62 

EBF7 18 08 

BBF9 FB 11 

BBFB 20 04 

BBFD AF 

BBFB 32 BB62 

BC01 3A BB6A 

BC04 3C 

BC05 FB 40 

KC07 D4 BC11 


BC0A 

BC0B 

BC0C 

BC0D 

BC0B 

BC0F 


;BREAK B,A,F 

QEOF: LD 

OR 
RBT 
LD 
CP 
RBT 
PUSH 
LD 
LD 
POP 
CP 
JR 
XOR 
RBT 

QE0F1: OR 

RBT 


A,(QLBN) 

A 

Z ;BMPTY 

A, (BCODB) 

20H 

Z ;NO BCODB 

HL 

HL,(TAIL) 

B, (HL) ;NOZOKU 

HL 

B 

Z,QB0F1 

A ;SBT Z 

0FFH ;SBT NZ 


EOF: CALL QBOF 

LD DB,0 

JR Z,B0F1 

DBC DE 

EOFl: LD (HL),E 

INC HL 

LD (HL),D 

RBT 


BC7B 3A EE65 

BC7E B7 

BC7F 78 

BC80 20 06 

BC82 FB 0E 

EC84 28 07 

BC86 18 10 

EC88 FB OF 

BC8A 20 06 

BC8C AF 

BC8D 32 BB65 

BC90 18 D7 

BC92 FB 20 

BC94 38 02 

BC96 CB F8 

BC98 78 

BC99 C9 

BC9A B5 

BC9B CD BCA4 

BC9B Bl 

BC9F 77 

BCA0 23 

BCA1 36 00 

BCA3 C9 


INTRSR: 


DI 

PUSH 

PUSH 

PUSH 

PUSH 


AF 

BC 

DE 

HL 


;INT ROUTINE 


BCA4 CD 0330 

BCA7 CA BB2A 

BCAA 3A BB6A 

BCAD B7 

SCAB 28 F4 


LD 

INTR1: LD 

OUT 
IN 

DEC 

IN 

LD 

LD 

INC 

PUSH 

LD 

OR 

SBC 

POP 

JR 

LD 

INTR2: LD 

LD 
INC 

CP 

JR 

LD 

JR 

INTR3: CP 

JR 
XOR 
LD 

INTR4: LD 

INC 
CP 
CALL 

POP 

POP 

POP 

POP 

BI 

RBT I 


BC.ZSIO+l 
A, 1 

(C),A ;RR1 
A, (C) 

BC 

A, (C) 

HL,(HEAD) 
(HL),A 
HL 
HL 

BC.Ql 

A 

HL, BC 
HL 

NZ.INTR2 
HL,Q0 
(HEAD),HL 
HL.QLEN 
(HL) 

XOFF 
NZ.INTR3 
(LASTX),A 
INTR4 
XON 

NZ.INTR4 

A 

(LASTX) , A 
A,(QLBN) 

A 

QMAX 
NC,SWAIT 

HL 

DB 

BC 

AF 


;QUE ! 

;OBT XOFF 

;GET XON 

;SEND WAIT 


BCBO F3 

BCB1 3A BB6A 

BCB4 5F 

BCB5 2A BB68 

BCB8 3A BB61 

BCBB A6 

BCBC 57 

BCBD 23 

BCBB B5 

BCBF 01 BBBB 

BCC2 B7 

BCC3 BD 42 

BCC5 Bl 

BCC6 20 03 

BCC8 21 BB6B 

BCCB 22 BB68 

BCCB 7B 

BCCF 3D 

BCD0 32 BB6A 

BCD3 FB 30 

BCD5 D6 

BCD6 DC BC3B 

BCD9 FB 

ECDA Dl 

BCDB 7A 

BCDC C9 

BCDD EB 

BCDB B5 

BCDF 23 

BCE0 78 

ECB1 FE 02 

BCB3 DA EE26 

BCB6 05 

BCB7 0E 00 

BCB9 E5 

ECEA C5 

BCEB CD 0330 

ECEE CA EE2A 

BCF1 3A BE6A 


CP *R’ 

JR Z.S0K1 

CP ’X* 

RBT NZ 

LD A,(XFLAG) 

OR A 

RET Z 

XOR A 

LD (XFLAG),A 

LD A,XON 

CALL PPUTC0 

RBT 

S0K1: LD BC.ZSIO+l 

LD A, 5 

OUT (C),A 

LD A,(WR5+1) 

OR 00000010B 

OUT (C),A 

RET 


;SET RTS 


XGETC: CALL 

LD 
LD 
CP 
JR 
LD 
CP 
JR 


POETC ;GET CHAR 
B, A ;SAVE 

A,(PARAM+1) 

'S* 

NZ.XGETC4 
A,(MASK) 

1111111B 

NZ.XGBTC4 


;S AND 7 BITS 

LD A,(RKIN) 

OR A 

LD A,B 

JR NZ,XGETC1 

CP SO ;T0 KANA MODB 

JR Z.X0BTC2 

JR XGETC4 


XGBTC1: CP 
JR 
XOR 

XGBTC2: LD 
JR 


SI 

NZ.XGBTC3 

A 

(RKIN) , A 
XGETC 


;CLEAR 
;AGAIN 


XGBTC3: CP 
JR 

XGBTC4: LD 
RBT 

PGBTC1: PUSH 
CALL 
POP 
LD 
INC 
LD 
RBT 


0A0H-080H 
C,XGETC4 

7,B ;T0 KANA 

A, B 


HL ;RBTURN CHAR 

POBTC 

HL 

(HL) ,A 
HL 

(HL),0 


PGBTC: CALL 

JP 
LD 
OR 
JR 


QBRBAK 

Z,BREAK ;BREAK? 
A,(QLBN) 

A 

Z,PGBTC 


DI 

LD 

LD 

LD 

LD 

AND 

LD 

INC 

PUSH 

LD 

OR 

SBC 

POP 

JR 

LD 

OBTCl: LD 

LD 
DBC 
LD 
CP 
PUSH 
CALL 
BI 
POP 
LD 
RET 


A,(QLBN) 

JRB-OBT 

B, A 

HL,(TAIL) 

A,(MASK) 

;SAVB QLBN 

(HL) 

D,A ;GET 

HL 

HL 

BC ,Q1 

DATA 

A 

HL, BC 

HL 

NZ,OBTCl 
HL.Q0 

;QUB ! 

(TAIL),HL 

A,B 

;GET QLBN 

A 

(QLBN),A 
QMAX-16 

DB 

C, SOK 

;SEND OK 

DB 


A, D 



LINPUT: EX 

PUSH 

INC 

LD 

CP 

JP 

DEC 

LD 


DE, HL 
HL 
HL 
A, B 

2 

C.ERR ;NO SPACE 
B ;DEC COUNTER 

C, 0 


L1P1: 
L1P1L: 


PUSH 

PUSH 

CALL 

JP 

LD 


HL 

BC *,SAVE COUNTER 

QBREAK ;BREAK? 

Z,BREAK 
A,(QLEN) 
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BCF4 

B7 


OR 

A 


BDAA 

20 0A 


JR 

NZ.IKANA 

BCF5 

28 F4 


JR 

Z,LIP 1L 


SDAC 

06 


PUSH 

BC {SAVE IT 

ECF7 

CD EBA0 


CALL 

QEOF 


KDAD 

3E 0F 


LD 

A,SI {SHIFT IN 

ECFA 

28 0A 


JR 

Z.LIP1L1 


EDAF 

CD BDCD 


CALL 

PPUTC 



;GET EOF 



EDB2 

32 BB64 


LD 

(TKIN),A 

BCFC 

Cl 


POP 

BC 


EDB6 

Cl 


POP 

BC 

ECFD 

El 


POP 

HL 




j 



BCFE 

79 


LD 

A,C 


BDB6 

78 

IKANA: 

LD 

A,B 

ECFF 

FE 0D 


CP 

CR 


BDB7 

B6 7F 


AND 

7FH JSBND 7 BITS 

EMI 

Zl IK 


JR 

NZ.LIPL2 


BDB9 

18 12 


JR 

PPUTC 





HL 







ED04 

18 27 


JR 

LIPL2 ;SUTE CR 


EDBB 

3A BB64 

nkana: 

LD 

A, (TKIN) 



; 




EDBB 

B7 


OR 

A 

ED06 

CD EC69 

LIP1L1: 

CALL 

XGETC 


BDBF 

28 0B 


JR 

Z.PUTC0 ;NO KANA MODE 

ED09 

Cl 


POP 

BC 







ED0A 

El 


POP 

HL 


BDC1 

C5 


PUSH 

BC ;SAVE IT 



; 1 LINE 

? 



BDC2 

3B 0B 


LD 

A,SO {3HIFT OUT 

ED0B 

F5 


PUSH 

AF 


EDC4 

CD BDCD 


CALL 

PPUTC ;PUT ANY HOW 

ED0C 

3A EE48 • 


LD 

A,(PARAM + 3 ) 


BDC7 

AF 


XOR 

A 

ED0F 

FE 4C 


CP 

*L’ 


EDC8 

32 BB64 


LD 

(TKIN),A 

EDI 1 

28 07 


JR 

Z.LIPL1 


BDCB 

Cl 


POP 

BC ;B=IT 

EDI 3 

FI 


POP 

AF 







EDI 4 

FE 0D 


CP 

CR 


BDCC 

78 

PUTC0: 

LD 

A, B {DATA TO TX 

EDI 6 

28 15 


JR 

Z.LIPL2 


BDCD 

F6 

PPUTC: 

PUSH 

AF 

EDI 8 

18 0E 


JR 

LIP2 


BDCE 

01 1F99 


LD 

BC.ZSIO+l 

ED1A 

79 

LIPL1: 

LD 

A, C 


BDD1 

CD 0330 

PUTCL: 

CALL 

QBRBAK {BRBAK? 

ED IB 

FE 0D 


CP 

CR 


BDD4 

CA BB2A 


JP 

Z,BREAK 

EDI D 

20 08 


JR 

NZ.LIPL3 


EDD7 

3E 10 


LD 

A,10H {RESET STAT 

ED1F 

FI 


POP 

AF 


EDD9 

BD 79 


OUT 

(C) iA 

ED20 

FE 0A 


CP 

LF 


EDDB 

ED 78 


IN 

A, (C) {QBT RR0 

ED22 

20 04 


JR 

NZ.LIP2 


EDDD 

CB 57 


BIT 

2iA {TX BUFF 

ED24 

2B 


DEC 

HL 


EDDF 

28 F0 


JR 

Z,PUTCL 

ED25 

18 06 


JR 

LIPL2 




. 





; 




EDB1 

CD EB09 


CALL 

CHTXOK {TX OK? 

ED27 

FI 

L1PL3: 

POP 

AF 


EDE4 

28 06 


JR 

Z,PUTOK 

ED28 

77 

LIP2: 

LD 

(HL),A 


EDE6 

3E 10 


LD 

A,10H {STAT RESET 

ED29 

4E 

L1P3: 

LD 

C , (HL) ;LAST CHAR 


EDE8 

BD 79 


OUT 

(C) ,A 

ED2A 

23 


INC 

HL 


EDEA 

18 E5 


JR 

PUTCL {LOOP 

BD2B 

10 BC 


DJNZ 

LIP1 ;FULL? 




; 



BD2D 

D1 

LIPL2: 

POP 

DE 


EDBC 

OB 

PUTOK: 

DEC 

BC {DATA PORT 

KD2B 

B7 


OR 

A 


EDED 

D1 


POP 

DE ;D=CHAR 

ID2F 

BD 52 


SBC 

HL.DB 


EDBB 

3A EE61 


LD 

A,(MASK) 

XD31 

BB 


EX 

DK.HL 


EDF1 

A2 


AND 

D 

BD32 

ID 


DBC 

B 


EDF2 

ED 79 


OUT 

(C),A {TX DATA 

BD33 

73 


LD 

(HL),B ;STORE LBN 




j 



BD34 

C9 


RBT 



EDF4 

3A EE6A 


LD 

A, (QLEN) 



; 




EDF7 

B7 


OR 

A {EMPTY? 



;INPUT 

n CHAR 



EDF8 

C8 


RET 

Z 

IDS 6 

D6 

INPUTN: 

PUSH 

DB ;SAVE ADDR 




• 



BD36 

BB 


EX 

DE, HL 




•DROP 

XON.XOFF 


HD37 

7B 


LD 

A, (HL) 


EDF9 

2A BE68 

PEND0: 

LD 

HL,(TAIL) 

IDS8 

23 


INC 

HL 


EDFC 

7E 


LD 

A,(HL) {NOZOKU 

BD39 

B8 


CP 

B 


EDFD 

FE 11 


CP 

XON 

BD3A 

D2 BB26 


JP 

NC,ERR ;TOO SHORT 


EDFF 

28 03 


JR 

Z.PENDl 



;a<b 




EE01 

FE 13 


CP 

XOFF 

BD3D 

06 


DEC 

B 


EE03 

C0 


RET 

NZ 

XD3B 

B7 


OR 

A 


EE04 

CD EC9A 

PEND1: 

CALL 

PGETC1 {DROP 

BD3F 

28 12 


JR 

Z.IPN2 ;REQUEST 0 CHAR 


EE07 

18 F0 


JR 

PEND0 

BD41 

47 


LD 

B, A ;COUNTER 




j 



KD42 

0B 00 


LD 

C,0 ;LEN 


EE09 

57 

CHTXOK 

: LD 

D,A {SAVE RR0 



; 




EE0A 

3A EE4 5 


LD 

A,(PARAM+0) 

ID44 

C5 

IPNl: 

PUSH 

BC 


EE0D 

FE 4E 


CP 

’N’ {NO CON 

BD45 

B6 


PUSH 

HL 


EE0F 

C8 


RET 

Z 

RD46 

CD BC69 


CALL 

XGETC 


EE 10 

FE 52 


CP 

’R’ {RTS 

KD49 

B1 


POP 

HL 


EE 12 

20 05 


JR 

NZ.CHX 

KD4A 

Cl 


POP 

BC 


EE 14 

7A 


LD 

A, D 

BD4B 

77 


LD 

(HL),A ;STORE CODB 


EE15 

2F 


CPL 

{REVERSE 

XD4C 

23 


INC 

HL 


EB 16 

CB 6F 


BIT 

5, A ;RTS 

BD4D 

0C 


INC 

C 


EE18 

C9 


RET 


BD4B 

10 F4 


DJNZ 

IPNl 







BD50 

El 


POP 

HL ;TOP ADDR. 


EE19 

FE 58 

CHX: 

CP 

’X’ 

BDS1 

71 


LD 

(HL)iC ;STORE LBN 


EE IB 

28 02 


JR 

Z.CHXl 

BD52 

C9 


RET 



EE ID 

AF 


XOR 

A 



; 




EE IE 

C9 


RET 


BD53 

D1 

IPN2: 

POP 

DB 


EE IF 

F3 

CHX1: 

DI 

{ENGIMON 

BD54 

12 


LD 

(DB)iA ;STORE 0 


EB20 

3A BB62 


LD 

A,(LASTX) 

BD65 

C9 


RET 



BB23 

B7 


OR 

A 

BD56 

CD BD68 

PRINT: 

CALL 

PRINTS 


EB24 

EB25 

FB 

C9 


El 

RBT 


BD59 

3B 0D 


LD 

A, CR 







BD6B 

CD BDCD 


CALL 

PPUTC 


BB26 

3B 06 

ERR: 

LD 

A,5 {ILL FUNC 

BD5B 

3A BB47 


LD 

A,(PARAM+2) 


EB28 

DD B9 


JP 

(IX) 

BD61 

FB 4C 


CP 

f L ’ 







KD63 

C0 


RET 

NZ ;’C’ 


BB2A 

F3 

BRBAK: 

DI 


BD64 

3B 0A 


LD 

A,LF ;’L' 


BB2B 

C3 1FCA 


JP 

BBREAK 

BD86 

18 65 


JR 

PPUTC 









; 




EB2B 


ctr: 

DS 

1 {CTC COUNTER 

BD88 

78 

PRINTS: 

LD 

A, B 







ED69 

B7 


OR 

A ;CK LEN 


BB2F 

68 62 4B 00 

PLIST: 

DB 

’XRN’,0 

BD8A 

C8 


RET 

Z 


BB33 

S3 4B 00 


DB 

’SN’,0 

ED6B 

1A 

PUTSL: 

LD 

A,(DE) 


EE36 

43 4C 00 


DB 

•CL*,0 

BD6C 

13 


INC 

DE 


BB39 

43 4C 00 


DB 

’CL’,0 

BD6D 

C5 


PUSH 

BC 


BB3C 

4A 4B 00 


DB 

*JN’ ,0 

BD6B 

D5 


PUSH 

DE 







ED6F 

CD ED93 


CALL 

PUTC 


BE3F 

4E 4B 4C 4C 

PDPLT: 

DB 

’NNLLN’,20H 

ED72 

D1 


POP 

DE 


EB43 

4B 20 




ED73 

Cl 


POP 

BC 







ED7 4 

10 F5 


DJNZ 

PUTSL 


BB45 


param: 

DS 

5 ;P AREA 

ED76 

C9 


RET 



EB4A 


BCODB: 

DS 

1 {5+1=6 

ED77 

F5 

PPUTC0: 

PUSH 

AF 


BB4B 


IOC: 

DS 

1 {OPBN MODE FL 

ED78 

01 1F99 


LD 

BC,ZS10+1 







ED7B 

3E 10 

PUTCL0: 

LD 

A.10H ;RESET STAT 


EB4C 

18 

siosa: 

DB 

00011000B ;WR0 

ED7D 

ED 79 


OUT 

(C) iA 


BE4D 

01 10 

WR1: 

DB 

1,10H 

ED7F 

ED 78 


IN 

A, (C) ;GET RR0 


EB4F 

02 00 

WR2: 

DB 

2,00H 

ED81 

CB 57 


BIT 

2,A ;TX BUFF 


EB51 

04 00 

WR4: 

DB 

4,00H 

BD83 

28 F6 


JR 

Z.PUTCL0 


EE53 

05 00 

WR5: 

DB 

5.00H 







BB55 

06 00 

WR6: 

DB 

6,00H 

ED85 

CD EB09 


CALL 

CHTXOK ;TX OK? 


BB57 

07 00 

WR7 : 

DB 

7,00H 

BD88 

28 62 


JR 

Z,PUTOK 


BE 5 9 

03 00 

WR3: 

DB 

3,00H 

BD8A 

3B 10 


LD 

A , 10H {STAT RESET 







ED8C 

ED 79 


OUT 

(C) ,A 


EE5B 

18 

SIOSB: 

DB 

18H 

BD8B 

18 EB 


JR 

PUTCL0 ;LOOP 


BB5C 

01 00 


DB 

1,00H 







EE5E 

02 5C 


DB 

2, INTRSV 

BD90 

7E 

PPUTC1: 

LD 

A,(HL) 







ED9 1 

18 3A 


JR 

PPUTC 


EE60 

00 

OPENF: 

DB 

0 {OPBB FLAG 

BD93 

47 

PUTC: 

LD 

B, A 


EE61 


MASK: 

DS 

1 {DATA MASK 

BD94 

3A BB46 


LD 

A, (PARAM+1) 


EE62 


LASTX: 

DS 

1 ;R FLAG 

ED97 

FE 53 


CP 

’S’ 


EE63 


XFLAG: 

DS 

1 ;T FLAG 

BD99 

20 31 


JR 

NZ.PUTC0 









; 




EE64 


TKIN: 

DS 

1 {R KANA FLAG 

BD9B 

3A BE61 


LD 

A,(MASK) 


EE65 


RKIN: 

DS 

1 ;T KANA FLAG 

BD9B 

FB 7F 


CP 

111111IB 







EDA0 

20 2A 


JR 

NZ.PUTC0 


EB66 


HEAD: 

DS 

2 {QUE HEAD 



; 




EE68 


TAIL: 

DS 

2 ; QUE TAIL 



; ’S’ AND 7 BITS 



EE6A 


QLEN: 

DS 

1 ;Q LENGTH 

BDA2 

CB 78 


BIT 

7 t B 


EE6B 


Q0: 

DS 

QMAXX 

BDA4 

28 15 


JR 

Z.NKANA ;NOT KANA 


EEEB 


q i : 



BDA6 

3A BB64 


LD 

A,(TKIN) 







RDA9 

B7 


OR 

A 





END 
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EA00 

C3 

IE 

EA 

C3 

84 

EB 

C3 

DD 

9D 

EA08 

EC 

C3 

35 

ED 

C3 

68 

ED 

C3 

AC 

EA10 

56 

ED 

C3 

98 

EB 

C3 

B9 

EB 

F0 

EA18 

C3 

9A 

EC 

C3 

90 

ED 

3A 

60 

23 

EA20 

EE 

B7 

28 

07 

D5 

C5 

CD 

84 

BF 

EA28 

EB 

Cl 

D1 

3E 

FF 

32 

60 

EE 

3A 

EA30 

3D 

20 

FD 

F3 

21 

C6 

EB 

22 

41 

EA38 

5C 

00 

FB 

EB 

78 

B7 

CA 

26 

61 

EA40 

EE 

05 

7E 

23 

FE 

49 

28 

0B 

0E 

EA48 

FE 

4F 

28 

07 

FE 

43 

28 

03 

E8 

EA50 

C3 

26 

EE 

32 

4B 

EE 

78 

D6 

90 

EA58 

04 

DA 

26 

EE 

FE 

07 

D2 

26 

EF 

EA60 

EE 

4F 

7E 

23 

D6 

30 

FE 

07 

E9 

EA68 

D2 

26 

EE 

16 

D0 

D6 

02 

F5 

99 

EA7 0 

30 

01 

AF 

B7 

28 

05 

CB 

3A 

C9 

EA7 8 

3D 

18 

F8 

7A 

32 

2E 

EE 

FI 

06 

SUM: 

1A 

E2 

00 1 
O 1 

E2 

74 

31 

D8 

D6 6C5A 

EA80 

16 

40 

30 

07 

16 

80 

3C 

28 

87 

EA88 

02 

16 

C0 

5A 

7E 

23 

16 

00 

E9 

EA90 

FE 

4E 

28 

0B 

14 

FE 

4F 

28 

08 

EA98 

06 

14 

FE 

45 

C2 

26 

EE 

7B 

AE 

EAA0 

B2 

5F 

7E 

23 

D6 

35 

DA 

26 

BD 

EAA8 

EE 

FE 

04 

D2 

26 

EE. 

F5 

16 

El 

EAB0 

E0 

B7 

28 

05 

CB 

22 

3D 

20 

0E 

EAB8 

FB 

7A 

2F 

32 

61 

EE 

FI 

B7 

CD 

EAC0 

EA 

C5 

EA 

EE 

03 

0F 

0F 

F6 

9E 

EAC8 

01 

32 

5A 

EE 

0F 

F6 

80 

F6 

F6 

EAD0 

02 

F6 

08 

32 

54 

EE 

7E 

23 

15 

EAD8 

D6 

31 

DA 

26 

EE 

FE 

03 

D2 

C8 

EAE0 

26 

EE 

3C 

87 

87 

B3 

32 

52 

95 

EAE8 

EE 

C5 

E5 

21 

3F 

EE 

11 

45 

3C 

EAF0 

EE 

01 

06 

00 

ED 

B0 

EB 

D9 

56 

EAF8 

El 

Cl 

11 

2F 

EE 

AF 

08 

79 

00 

SUM: 

3D 

D9 

4D 

M 1 
00 1 

87 

EB 

D2 

A8 CC3B 

EB00 

B7 

28 

IF 

FE 

06 

20 

02 

0D 

31 

EB08 

08 

46 

23 

1A 

13 

B7 

CA 

26 

45 

EB10 

EE 

B8 

20 

F7 

D9 

12 

D9 

1A 

9B 

EB18 

13 

B7 

20 

FB 

D9 

13 

D9 

0D 

B7 

EB20 

20 

E7 

08 

B7 

28 

10 

7E 

FE 

7A 

EB28 

40 

DA 

26 

EE 

FE 

80 

D2 

26 

A4 

EB30 

EE 

E6 

IF 

D9 

12 

D9 

F3 

CD 

77 

EB38 

6A 

EB 

01 

A9 

IF 

3E 

47 

ED 

90 

EB40 

79 

3A 

2E 

EE 

ED 

79 

21 

4C 

A2 

EB48 

EE 

01 

99 

IF 

3E 

0F 

CD 

63 

24 

EB50 

EB 

21 

5B 

EE 

01 

9B 

IF 

3E 

4E 

EB58 

05 

CD 

63 

EB 

3E 

FF 

32 

60 

EF 

EB60 

EE 

FB 

C9 

04 

ED 

A3 

3D 

20 

A3 

EB68 

FA 

C9 

AF 

32 

6A 

EE 

21 

6B 

88 

EB7 0 

EE 

22 

66 

EE 

22 

68 

EE 

32 

0E 

EB7 8 

62 

EE 

32 

63 

EE 

32 

64 

EE 

57 

SUM: 

07 

6C 

65 

9E 

F3 

F0 

F7 

30 1771 

EB80 

32 

65 

EE 

C9 

AF 

32 

60 

EE 

7D 

EB88 

3A 

4B 

EE 

FE 

4F 

C0 

3A 

4A 

04 

EB90 

EE 

FE 

20 

C8 

CD 

CD 

ED 

C9 

24 

EB98 

3A 

6A 

EE 

77 

23 

36 

00 

C9 

2B 

EBA0 

3A 

6A 

EE 

B7 

C8 

3A 

4A 

EE 

83 

EBA8 

FE 

20 

C8 

E5 

2A 

68 

EE 

46 

91 

EBB0 

El 

B8 

28 

02 

AF 

C9 

F6 

FF 

30 

EBB8 

C9 

CD 

A0 

EB 

11 

00 

00 

28 

5A 

EBC0 

01 

IB 

73 

23 

72 

C9 

F3 

F5 

D5 

EBC8 

C5 

D5 

E5 

01 

99 

IF 

3E 

01 

77 

EBD0 

ED 

79 

ED 

78 

0B 

ED 

78 

2A 

65 

EBD8 

66 

EE 

77 

23 

E5 

01 

EB 

EE 

AD 

EBE0 

B7 

ED 

42 

El 

20 

03 

21 

6B 

76 

EBE8 

EE 

22 

66 

EE 

21 

6A 

EE 

34 

11 

EBF0 

FE 

13 

20 

05 

32 

62 

EE 

18 

D0 

EBF8 

08 

FE 

11 

20 

04 

AF 

32 

62 

7E 

SUM: 

3A 

9E 

FD 

42 

12 

B4 

78 

4C 99CD 

EC00 

EE 

3A 

6A 

EE 

3C 

FE 

40 

D4 

CE 

EC08 

11 

EC 

El 

D1 

Cl 

FI 

FB 

ED 

49 

EC 10 

4D 

01 

99 

IF 

3A 

45 

EE 

FE 

71 

EC 18 

4E 

C8 

FE 

52 

28 

11 

FE 

58 

F5 

EC20 

C0 

3A 

63 

EE 

B7 

C0 

3E 

13 

13 

EC28 

32 

63 

EE 

CD 

77 

ED 

C9 

01 

7E 

EC30 

99 

IF 

3E 

05 

ED 

79 

3A 

54 

EF 

EC 3 8 

EE 

E6 

FD 

ED 

79 

C9 

3A 

45 

7F 

EC40 

EE 

FE 

4E 

C8 

FE 

52 

28 

12 

8C 

EC48 

FE 

58 

C0 

3A 

63 

EE 

B7 

C8 

20 

EC50 

AF 

32 

63 

EE 

3E 

11 

CD 

77 

C5 

EC58 

ED 

C9 

01 

99 

IF 

3E 

05 

ED 

9F 

EC60 

79 

3A 

54 

EE 

F6 

02 

ED 

79 

53 


EC68 

C9 

CD 

A4 

EC 

47 

3A 

46 

EE : 

DB 

ED70 

93 

ED 

D1 

Cl 

10 

F5 

C9 

F5 

: D5 

EC70 

FE 

53 

20 

24 

3A 

61 

EE 

FE : 

1C 

ED7 8 

01 

99 

IF 

3E 

10 

ED 

79 

ED 

: 5A 

EC78 

7F 

20 

ID 

3A 

65 

EE 

B7 

78 : 

78 





















SUM: 

0D 

24 

66 

AA 

33 

B7 

5D 

11 

8D3D 

SUM: 

5A 

5C 

15 

9E 

8D 

4E 

2B 

DF 9564 





















ED80 

78 

CB 

57 

28 

F6 

CD 

09 

EE 

: 7C 

EC80 

20 

06 

FE 

0E 

28 

07 

18 

10 

89 

ED88 

28 

62 

3E 

10 

ED 

79 

18 

EB 

: 41 

EC88 

FE 

0F 

20 

06 

AF 

32 

65 

EE 

67 

ED90 

7E 

18 

3A 

47 

3A 

46 

EE 

FE 

: 83 

EC90 

18 

D7 

FE 

20 

38 

02 

CB 

F8 

0A 

ED98 

53 

20 

31 

3A 

61 

EE 

FE 

7F 

: AA 

EC98 

78 

C9 

E5 

CD 

A4 

EC 

El 

77 

DB 

EDA0 

20 

2A 

CB 

78 

28 

15 

3A 

64 

: 68 

ECA0 

23 

36 

00 

C9 

CD 

30 

03 

CA 

EC 

EDA8 

EE 

B7 

20 

0A 

C5 

3E 

0F 

CD 

: AE 

ECA8 

2A 

EE 

3A 

6A 

EE 

B7 

28 

F4 

7D 

EDB0 

CD 

ED 

32 

64 

EE 

Cl 

78 

E6 

: 5D 

ECB0 

F3 

3A 

6A 

EE 

5F 

2A 

68 

EE 

64 

EDB8 

7F 

18 

12 

3A 

64 

EE 

B7 

28 

: 14 

ECB8 

3A 

61 

EE 

A6 

57 

23 

E5 

01 

8F 

EDC0 

0B 

C5 

3E 

0E 

CD 

CD 

ED 

AF 

: 52 

ECC0 

EB 

EE 

B7 

ED 

42 

El 

20 

03 

C3 

EDC8 

32 

64 

EE 

Cl 

78 

F5 

01 

99 

: 4C 

ECC8 

21 

6B 

EE 

22 

68 

EE 

7B 

3D 

AA 

EDD0 

IF 

CD 

30 

03 

CA 

2A 

EE 

3E 

: 3F 

ECD0 

32 

6A 

EE 

FE 

30 

D5 

DC 

3E 

A7 

EDD8 

10 

ED 

79 

ED 

78 

CB 

57 

28 

: 25 

ECD8 

EC 

FB 

D1 

7A 

C9 

EB 

E5 

23 

EE 

EDE0 

F0 

CD 

09 

EE 

28 

06 

3E 

10 

: 30 

ECE0 

78 

FE 

02 

DA 

26 

EE 

05 

0E 

79 

EDE8 

ED 

79 

18 

E5 

0B 

D1 

3A 

61 

: DA 

ECE8 

00 

E5 

C5 

CD 

30 

03 

CA 

2A 

9E 

EDF0 

EE 

A2 

ED 

79 

3A 

6A 

EE 

B7 

: 3F 

ECF0 

EE 

3A 

6A 

EE 

B7 

28 

F4 

CD 

20 

EDF8 

C8 

2A 

68 

EE 

7E 

FE 

11 

28 

: FD 

ECF8 

A0 

EB 

28 

0A 

Cl 

El 

79 

FE 

D6 

SUM: 

CA 

40 

7A 

D2 

2F 

72 

2F 

93 

6DF0 

SUM: 

58 

3A 

50 

EE 

95 

E4 

39 

BE CDF1 











EE00 

03 

FE 

13 

C0 

CD 

9A 

EC 

18 

: 3F 

ED00 

0D 

20 

2A 

2B 

18 

27 

CD 

69 

F7 

EE08 

F0 

57 

3A 

45 

EE 

FE 

4E 

C8 

: C8 

ED08 

EC 

Cl 

El 

F5 

3A 

48 

EE 

FE 

FI 
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FE 

52 

20 

05 

7A 

2F 

CB 

6F 

: 58 

ED 10 

4C 

28 

07 

FI 

FE 

0D 

28 

15 

B4 

EE 18 

C9 

FE 

58 

28 

02 

AF 

C9 

F3 

: B4 

ED 18 

18 

0E 

79 

FE 

0D 

20 

08 

FI 

C3 
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3A 

62 

EE 

B7 

FB 

C9 

3E 

05 

: 48 

ED20 

FE 

0A 

20 

04 

2B 

18 

06 

FI 

66 

EE28 

DD 

E9 

F3 

C3 

CA 

IF 

15 

58 

: D2 

ED28 

77 

4E 

23 

10 

BC 

D1 

B7 

ED 

29 

EE30 

52 

4E 

00 

53 

4E 

00 

43 

4C 

: D0 

ED30 

52 

EB 

ID 

73 

C9 

D5 

EB 

7E 

D4 

EE38 

00 

43 

4C 

00 

4A 

4E 

00 

4E 

: 75 

ED38 

23 

B8 

D2 

26 

EE 

05 

B7 

28 

A5 

EE40 

4E 

4C 

4C 

4E 

20 

CD 

83 

21 

: C5 

ED40 

12 

47 

0E 

00 

C5 

E5 

CD 

69 

47 

EE48 

47 

C3 

B3 

20 

18 

01 

10 

02 

: 08 

ED48 

EC 

El 

Cl 

77 

23 

0C 

10 

F4 

38 

EE50 

00 

04 

00 

05 

00 

06 

00 

07 

: 16 

ED50 

El 

71 

C9 

D1 

12 

C9 

CD 

68 

FC 

EE58 

00 

03 

00 

18 

01 

00 

02 

5C 

: 7 A 

ED58 

ED 

3E 

0D 

CD 

CD 

ED 

3A 

47 

40 

EE60 

00 








: 00 

ED60 

EE 

FE 

4C 

C0 

3E 

0A 

18 

65 

BD 











ED68 

78 

B7 

C8 

1A 

13 

C5 

D5 

CD 

8B 

SUM: 

B8 

97 

FI 

8A 

CD 

80 

F9 

BF 

E0FD 


'J*b3 •y->’?)U’7n 9=71* 


100 CLEAR &HEA00 

110 IF MEM$(&HEA00,3)0HEXCHR$(”C3 IE EA") LOADM "RS.OBJ" 


120 DEFUSR0=&HEA00 
130 DEFUSR1=&HEA00+3 
140 DEFUSR2=&HEA00+6 
150 DEFUSR3=&HEA00+9 
160 DEFUSR4 =&HEA00+12 
170 DEFUSR5=&HEA00+15 
180 DEFUSR6=&HEA00+18 
190 DEFUSR7 =&HEA00+21 
200 DEFUSR8=&HEA00+24 
210 DEFUSR9=&HEA00+27 
220 1 


’OPEN 
’CLOSE 
’LINPUT 
’INPUTN 
’PRINTS 
’PRINT 
’LOC 
’EOF 
’PGETC1 
’PPUTC1 

’) 


: STR 
: * 

: STR 
: STR 
: STR 
: STR 
: INT 
: INT 
: INT 
: INT 


230 A$=USR0("06N83XNCCNZ") :’OPEN 

240 A$=USR1("") :’CLOSE 

250 C=10:A$=USR2(STRINGS(C,".")):’LINPUT 
260 C=10:A$=USR3(CHR$(C)+STRING$(C,"INPUTN 
270 A$=USR4("STRINGS") :’SEND STRING 

280 A$=USR5("ONE LINE") :’SEND 1 LINE 

290 A=USR6 ( 0) :’GET BUF SIZE 

300 A=USR7(0) :’EOF ? 

310 A=USR8(0) :’GET 1 BYTE 

320 A=USR9(0) :’PUT 1 BYTE 




220 ’100 - 210 ** A »iX13 J Jf*7\ 

230 A$=USR0("C6N83XNCCNZ") :’OPEN 

240 L$ = "" 

250 IF USR7(0) THEN PRINT "GET END":END ’EOF 
260 A=USR6(0):IF A=0 THEN 300 ’LOC > 0? 

270 A$=USR3(CHR$(1,0)) 

280 A$=RIGHT$(A$,1):A=ASC(A$) ’GET AND DISPLAY 

290 IF (A> = &H20) OR (A=13) THEN PRINT A$; :GOTO 260 
300 C$=INKEY$(0) ’READ KEY 

310 IF (C$=CHR$(0)) OR (L$=C$) THEN 340 ’YUUKOU ? 

320 IF C$=CHR$(13) THEN A$=USR5(""):GOTO 340 
330 A$=USR4(C$) ’TX IT 

340 L$=C$:GOTO 250 
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4o"C*.'&o £LT, ^'a^f <| 7^*’ 
^©fi^4turbo(ii®t^4 , r', h ') ifk 
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160 OUT &H1COO, 15:OUT Mil BOO, A OR RMASK 
170 GOTO 130 

ux b 2 uV=7U 

100 OUT &H 1C00,7 : OUT &H 1B00 , &.B10 J 1 11 1 1 
110 ’MASK = &B 1 0II11 11 :RMASK = MASK XOR &HFF 
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180 FOR 1=1 TO D 
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210 NEXT:PRINT"."; 

220 GOTO 140 


a ?-y A ©fJllJ-r'M^mii LX L i o 4 •) t 
Z<DX\ 1b V A imW&JHo TON/OFF L 

x? c, 4 1 '19 1 < jiw l x < n4t'©r 
*5. K-r, t 1*iTiiBASICr'{) t> 
I' j f> 11'?: Lf^o/l©* 5 !) x h 1 X'ft 

So 

ffiscuumi-cio- < t, looif-rjoYi^ 
A*, JOY2 till* lists L TO 4o 110, 

120It li h ') if 1 *■ h ') if 2 t -4 ft* 4 t" 
•9 Y -? x VOM.'mXh S„ Z d-C'li h ') if 
1 (STRIG(n) X'% g&Ui $ n S (i 9 ) 
ts i 9 U4o-Cl'So 130, 140ftliM 
#4-ON II L T JOY2 *■ C,& I) 1 'l',TS|S'0- ( k" 
•7 h •; a •> h t s i on 4©4'), iso, 160 
fi-lil' ';*"5fOFFULTJOY2*‘ibiIiai 
t%%X'hh« 

z(07°a?"7 A^-bfeiba-s t, 
h <; *"i auts+snso uaw 
t'-C'^iba-4 t, 4*t'4t'#%l>405l<*C,i' 
-C'*S*‘ib, it ^"S ©f'145, 1 65 |t II 
FO R ~ NEX^T © ?£^ -7° fr t' H X m eH t 
s z t ii4 s 0 l*-l ^n-ciiiniJi* J *s 

©4"o 11 ' 9 ©li, 

Lti'5 L , ?■ © ThI li x f 4 -7 ^ © 

®I S £ turbo UfS x >b 4x 4 t' Z t U 4 S *’ 
b T"* S o 

nt, £© l& ©7° 0^7 a t L Tli y 
x h 2 r i * i t o 9 z t ii 4 s4* 
S?. iiV'sZC fcD©f®fc#*lllSL'T 
MKtSt, iAIJTi'OU < 4S-C*A9 o 
z««i§-r7 °d7" 7 a 
LT {>teltr©S?tSbnSo 4fc, X1 
C t turbo -9 4 <" t — 7*71/lit' ib«J> S 7 
n X^^ll4-o-Ci'S'i!'>W* s *4„ fli, 
ft ©At- 

1. @llfUX7n— 

2. ©©-t"k"7 X Ii 4 z: A PCG -T 
^7 ^ ^ X 7 a -a, $ tf-c t' 4 t S 9 ©4' 

I - < M.X (, 4 K 7 h Sfi4©-T'* 4, 
t' 9 L X4' ? 3. PCGffl©r"-^^f1s-o 

tte gt, 4„ 1 K '7 h 

■f lb L fc-r—ftk lAlTS4o z ft 
^Ki£d®l6jSa-|i'Ky h IF-fix 7 o —/u 

* s r |i 4 ©rii ? JbLh, L -O *> 6 Lo*> 

0 »jL 4 i 9 Ii ! ARW i®Ill®.-- 

tr tr tf, 4 A T 4 i t' & 4 KHHT" 
^)7b9Zt*‘o L*’L, I^II^A 
X ? 4 *• tb * 1 * f 4 < S A 4©r* S o 

r *©a"f'^Xj ti'9©liXUfl©-t"b- 

!>x®z ^ 9, Wt' ii*4xii 

9 (itii®) * ? 4 K -7 L Sftf' X 7 u — 

4©r* 4. K-T'fAli$ O i < -f't" 



^x©gj^4itiIPLx4 LTBAS 

IC^ifKftlf, ik< f-tEa-fli “DEFC 
HR TOOL” ?Ofef.a-4©T'*4. TS t 
So 4 t - D Ii, F Z lili r 4 R h -f n 
izmmm'Sfi-'yj a-to 40 -r* 

So 

•?■ 9 , Xlffl©4ff'9xli*c,*-L* 4 K 
7 h Tft4 A, B2 a 7 b ©PCG k ffl M L 
Tfet'-C, r A7'>—7“©PCG-»B7>—7° 
© PCG-^ 1 tf (8 R 7 h) Tib L 4 A 7>- 
7°© PCG j tt' 9 *^i:^LT, 4 R 7 
b x7o-77^^^L-ri'4©-r'*S„ H 
PS5II Ii320 x 200© 2 HH %■ r o Z Ali'o 4 
At«J0^A*^L'Ci>4©-r*A9o 4 
*>4*>©^/f f 7 t£4fi,r *So 
5t, r l R 7 bt'tbL4r"-7 5fPCG^ 
1ST Alii X 7 n —;7|i 4 4 A'j ©SflJiT'lb 
4* s , af#Wi:li^figir*4*L ftPf Ii4* 
toXftbOo PHMlii-t4iiPCG©^» 
a*-r*4„ turbo-nt«g5rffiAif^n 
4 0 © 6 ©Iif^4t4 *• I) L T-4 t'A s , 
fU‘4 1 ) ?SMSa s # 4o 4"*‘ ib£|sib*4 
Ii9* s 4t'-C'*A9 (»®M6*4) 0 
#1^11 4o4*' ; r X7n— 

Aj liMLTIi r $tx.ia-Aj ISitlJ 

< <J)X'fo 4. UtAT fc b 9 Z t i 0 {>, i 
'3-r»ftLTt'< Z fc©li9* { IA4*>tlffi 
fi*' ; *4©4'o 4'*>ibftA 4 A U*>4i'<, 

T 4 L Z hXh 4 * s , 6 H ^-T'lX 0 ±lf 
4 r Xl-T'2DD©R7 4 7^f!9j ti>9© 
liHL-C, liLfeSt 

A©** > ib»t : * s *4©-r'*4„ #iili?: 
©» ! § : 4 , $S^'L4 UT4 fc©40r*4**. 

3USIA (%ia + »S) 7*--?7b7°D7" 
7 A®3cii*'‘€'^4'o 4 0 t 4 ©'CTL lijfii 
ffijlsi: < U-oXf&XLi 9 ©"Cib 4 „ H, 
@Tfcf>/f>L4Ji'Wifi4, T4 

t z At'i©tt*M«f©*» 0 U:**i‘Ci' 

< ©T"* o 4» ■e-Tt-t'li, § i 4 ib $ i 4 
ib^i4ibT*4o 






K8tHUl4X 1 83 








X68000B ASIC AR-S1 HI 

©<035l)X-BASC 
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oTi'fclit©$Sfc* f iiffllit'; t Cie 
ij l 40-Cto 

t'H C© BASIC 11 OS t e Ip© 2 o© 
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L, ;©X-BASIC lit *>cmS44>4© 
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<■') on'n'll4- ; i£i:‘ttt, 4 $ CiWjIRa Sb©0! 

-c'fi(;a^A*‘OTi>4©-rt O'— k^f 
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S 4 t**)„ 
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©BASIC-tflifr'ft©ft4'li4.Sxt- h ^ 
> h ©*& t*' : XW:C l 4*4 X-BASIC 

•rinMt**BW»tf a l -cm t $ n 4 a*, 

£i£ t1' 1 5 l © li^ISc©SaH l flifflfS 
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ft^t**nft?r*tie#tto ut, ? 
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©f to 


eK»5te©£M 


X-BASIC -cm 7 Z t©ft< 5f"-^S 
I14''M Hfgft(int), pq t^ft(char), 
* ft (float), *¥$11 (str) © 4 mmC-to fM 
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o4 (1 'U t££ft* f if 14) z i i, m 
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of,’) Zt'C'Li**’. ; ft to© t°— £ $? 
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<'1=S-X I \ 
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BASICOSMII r"- ^ M<Di%.b r.'mZ 
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float gundaro 
str ideon 
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int lcazuya=100, tatsuya, minami = 15 
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dim nantara(10) 

t t, 

for i=0 to 10 
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next i 
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Xfto ^ niifie^cOBASICi: (,* 1 i L 
41, -t A4C$6 1 c 

n i r t im 

if then ; else £2 

copjC-r^itJlit, “*fWcofjt* ? *(o 
-041.') 4 C> “xr 4%ffL, “^fl-fOcO 
( 0 ) 4 f. It “X 2 ” Lit, 
i 4, else fJ,rt* ; ?f?l : . L 41) Olf 
t s K-co t ^cot*. “Xi” 4^?ff L t-fo :n 


4)itiH-r^-t 10 1 © 1 7 i: 4 0 * to 
zco t 7 ofsE^cOif t 4/ico^i' (> 4i' 
<0-C't* f , X-BASICt'(t“Xi”, “X2”4 I 

11 -tm-nfcf-os s se 

5iIco?;jJEIHtco t : 5 X l> jt^s i L 4 4, I 
t I t 4* f o T {, 

tC'CO-C'-to CtUi, tt^C0J:7O, then 

^Pelse In] 4 xi/ f- x r — h 7 > h -C'^" t> §' 

Ac«IIi*TX4ae3tL-tt'4z h fcJt^n 
«r*s 4 iS#-ot (x-basic rt.: r'E 

iffl «. z 11: <± 1 -7 21^ X f- h 7i o h <Dti 
it* s nr^rt* f )o i BASICc07‘n 9’y 
a t; (> H L $ 4IIS-C I! b Bffti: 4o 4 X 
7 "C'-f 4o JOT I- if-then-else C0lSj£f?iJ4 
xixL it. 

■0d[T] 1 fr'C'IBj'E 

if i = 1 then print else if i = 

2 then print "4lT’ else print “4^ 

mm then^elseCO^ b 

if i=l then { 
print 
}else{ 

if i=2 then { 

print “4t'” 

)else{ 

print “4 <§A" 

} 

> 

M! elsetif4o4lfTelse 
if i=l then { 

print “ V11> " 

}else if i=2 then { 
print “('V'” 

}else{ 

print “4 § X ” 

) 




tzt't y□ y*7 

J: 1 Uo X-B 

AsicT'(^#-§-tiyp rvAtonftizi&mk 
T'Ttf, ZfQy^AOXtKntzMZ'&WT-to 
yp^7A^i:llT(i, ft* 

*rfcu<7> 

cnii, BASIC _LT 
•7’p ^'7 A^A^-r^Jt^T'-To /c/c, save, 
load op Tiil ct -fe —+ 

ol TJU'> x;U(7) Note Book A' £'T*flFo/:7 
T’-rju^yp^'^A^LTP-K-r^c^t 
oIbIT'To ^ /c, save@, load® J: o 

T^f#-§-4'LT"fe-^, P- VTZZt b^J 
bIT'-To 

77<HBASIC WItV 

?o 

cF t, (?) *km r 

l J L J: JjtT (7)7 p P^ 7A ^rsave @ np^ 


T'-tz-7'L/c<7)-t>, load® W'P- KLT 
«^T < 
dim a(3)= I 
0, 1. 2, 3 
I 

print a(0) 

save@ np^Tir — 7*L/c<7){Z 
r ^T#-t(7)^i)7 7<;UT'f j 
^U9X7-^7*t2-V^|iiiL/zt3lo *tl 
T*(i, ^I'^Z^T'load^^r^oi:, ^ 
(i r; fr#-§-<7)4'l N 7 7 *f JUT'Tj tl^X7 
-Xyt-y^T, #£^7:r<;i'£P-K 
±<n~7ay 

7 A (7) 2 ^rS^\ 

0 r 1, 2, 3 

T^?>/ca6tZ f Z(7)'i('if 
#-§-(i0) tfrteZhtztzitoT'To i7-f 
Lfc^«)(z f 

(7) load® np^^^'x. o L'(Z < < 4'oTL' 
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for next 

for next©-^—7° {> BASIC"C lii: <1Sib 
n Z m'0Mfc-C'to Ztili, tski)ML®& 
* ? b *• o X l' Z *§£•C, * -7° 4 ft b SW 
miSfL/w. L *“ l, XBASIC©for nex 
t BASICc*f L X4>*#m 

ii i UUll\\botz{,0)r-f£o'C^'i t„ o© 
xf — h p* 7 h ii, 
for = UJ8BII to 

t, 

next 

fc©H*tt*>jSt I>©1“\ IgUSlIi “« 
ft « • -C'f&S S it * Sr “ *;j«r i: SS: 

f L^0t,, next U §4 jit 5Cr t i:fft5r 
1 $ -tf-T i' &, $ft©lit* ? 

fit" J: 0*S < ft* irtTbftit. :n 
4ii£tt0T'^t 10 2 © i 5 c 4- •) £ t, 
44'L, X-BASICf ©OT©«fc 7 4®IIR 
* ? #')£to IT, ttintShT‘4 

itnii'4 d * -e-Ao i 4, i t © 

ftftOJifl* 0 2 

tA, 0 

±rttH 0 f> ©t'tte (4 7 i' 7 t$nt* f 4 
< T JlL<4l' 

ton 4 S )o f^J t U li JUT© t fc- o -rt, 

«0D J|l**l»y*L 

for i=l to 4 

print “ Z. vl 

next 

c©ffl-rttSHS i *» l *» G> 4 c4* & | 

*) i‘4sb^,4lPl“C :t4 

4” * ? 7°y > h sn6 0 

flJH 

for i=l to 4 

if i=l then { 

print “V^" 

} else { 


print “-f'COffij” 

} 

next 

» — 7 °'$; fJi CO fjj| J j; /u - *7° |A] -£"# J[(i 1" S:l: 

* ? t" £ S o d CDWIt'tt i (Diitii)' 1 (DlbtSU 
w %7°') y h l, 

£ 7° 5 > h t h o 


while emlwliile 

while!- X 6^ —7°l£for next ©^ — 7° 
t liH4 D. ISfta^S©^!: 

ffll'itort. 0©,w-7°Ha^fc© BA 
SIC4*n-oTt.' S At:liSI|ife*0l*i't© 
fit?, c. <nn, 

while ^ffit 

t. 

endwhile 

©an 4 $ h s-r i> ©t\ i* d ii m “#tf 
A”* ? K-r* 6 B5*ft5h £ t (^-7°©** 
ib *) A'wend'T 4<■' C t !-it^f.)o 0 © t § 
“ftffcr ©f am •> S L ©flW43?frt S 
fi<:PHUiit„ ;ft4ift ti 0 -C'tfI • t 
0 3 © J: ? t: 4 0 i to i 4, C © while 
t & c t i < mi- f>n 
Sct^-C'to ^©fcAUtt, Self. (Of 
4<■') J: 945^4 “*fW l^i.t'Ph 
Hf J: t'©-r'i-o 4 t xIf, 1 (li 0 -T'4 1 ') 
T, 

while 1 

^ — 7°b' to ^)l^i l l , i Uii L 6 break 

^ ffl i4to #1W ?f 7° p ^*7 A CD 

lii'fc/jcod 5 (- #i'goto (f^idi) cof^b 0 (i®! 

fflir s i tfcottfflffiittiUT© k fc o rto 

^■JIT] while 

i = l 

while i>0 

input Ji 


print “&tz£fz'' 

endwhiIe 

c omt'ltm'i i r-XtiznzIgLtfiE-Ct) 

•jiitsi!) u *tsztr 

o 

«|2] &pg;u-7° 

while 1 

input li 

print “ 

if i<=0 then break 
endwhile 

cnii«nikHi:^ffl«r+i. 

I'epeiil mil i I 

C. ©repeat until 4 J: ?> ^—7° t while t 
fHj 4' <, ^ 0 jK UeJS* 5 ^^©^ h j® L c 
fflt'iitti-fo znii, 

repeat 

k , 

until 

© fit] 4 tf ur. 4 ■& 2 -cm i st 

fc©-rto “^^’©ftiinojgt-s&x 
4*tf L4* t t„ cn©i® 

n0li0 4©i 9 «:4 h it. while t© 
iti'iiX41 umiftstt' ?*-t t'7 c 
t C 4 *J i to while* 5 ' r ~©l'l]j i i‘ 5 #; 
el<, until*’ r ~ i fj t i' 7 ?> -1 

t 4*ll^-Ci.'nifitt'«f J tl0*-r L J: 7o 

mm 

repeat 

input :i 

print 

until i<=0 

C COW 4 whilek I^J l' o 

xwilrli ease ileliiiill enilswilrh 

cnii^©BASic-rii*i iisct 
©r^ 4t’*ffli*jg-r, <4©j; 7 4^s;-r 


▼ HI if then else 


32 for next 


03 while endwhile 


34 repeat until 


if £#it then X 


T* 


if then Xielse X2 


{ft 

‘Ti 


X 2 



while 

Xi 

X 2 

Xn 

endwhile 


i. m 
J5l 


m 


X 2 


Xn 


repeat 

Xi 

X2 

Xn 

nutil 


T* 


? 
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(am t to 

switch So 
case Si : % i 

case Sa : A a 


case Sn : Sin 
default : Sn.i 
endswitch 

::f “Sr*'ii “So" *-ni^$c*>S: 

(l £-jr-$?7tf x h a 7 Tim A 4’ 
1>©T', Ktttt-fS l '<4 

M&&) f4imii'4 i) i&A.O 7°nX? 
AOifcfili, “So” ©(jt£;]<«6, {>1, t 
ft k—Scl" 5 b ®*' ; “Si” *• ^ “Sn” i X 
©tfCibftli', *©casei-mfc*fr+ 6 k 
t> L, “So” k-iict 5 k© 
* s 4 It fttf, defaultiUPW^tTS ft t to 
z ©|||f^<rttnHi:+ S k El 5 © i b t: 4 
t i to 

4 ft, “So" **“Si” *>£ “Sn"i-Tk — 
itC L X^j&X b , 7'd^ 7 A*t_h*> t,)ii# 
CM fix tit < Jtli, defaultJUP&iift-f 

MffZ a h z k i: L *> 

L, £ < ©*§£• lidefault i: 4 £ t o < * X 
t-break (Mi£) U i o Tswitch k endswi 
tcf^HSJS'ttltfti LX L i i 4 , default 
UmSMXU <, HKDcasefMr.mt'ax 
*•'ZXt L>Mfrt Z> Z llifi *) i-£A 0 i 
tz, defaulting li if? Hft LX bt'ii'i. -£■ A 0 
£©k£li, “Si” *' •!> “Sn" £ "C’{-“So” 
k— Set S fc©**4l' k, 4«- t l4t'T" 
switch kendswitchCDIiSIi'fStt/Jj LX L i 
l'it. 

PASCALOCASESl-Tli, M^C.nfcS 
k—Stt S !>©* 5 4ttftli4t.7-(:4oT 
L i i' i Xi}\ default (Bt/Efit) k t • ? 8 
(KI&£IS:ti4/£, * a <.'liil#?&c4i' b 
©li(ffifli£ft& k l' ? *!i7°n7"7 A©g 
▼IS5 switch case default endswitch 



**5fJS< LX < nzX’L x io Hi:# 
S 4 IS UNIX±0= 7f|2 
lS'7-^yacc (5fcE©Wffl$A.©ie*i:£ 
P i L 4fa) I zi-oX ffc (j $ ft 3 7° a 7 " 7 
A (CHIlt) li, T a k InJIHOswitch-cas 
e-default^ffli'T^SS^^^C^ftS-frT 
i' < bO)fi<DXlTo 

t'i |-T®BASICt'£5 T k®t'»4*> 

-o 4 w ©switch-case default-endswitch 
li, 41: & ^j-4 T o 4 b (OX'li 4 <, t 

a^mwmmkx'fi & *• u?:m $ ft 4 
®4' k t> 7 C k li i < mm l Tft < £'W* ? 

2b h i. X o k C bX\ case©S®<4© I li 
vivfxf - pS>h &7jk X {> ©ft A* f>, 
case©S©f^ A ic 4 It {> #*‘4 <•’ k c 1 I 
4#ttTli4 I) iitAo WT l-switch4ffi 

ffl 14(5114-^1 it. 

15iJT] break L 4 U' 

switch i 

case 1 : print “V^ 
case 2 ’• print “CV'*” 
default : print “fc'Nc*//’ 

endswitch 

c (Dint'lt i l o) i % u, “c't,”, “c 

C'*, u tz < $4." > h 5*1, i* ? 2C0 

So u fz<ZA.” 

ns 0 

^][2] default^' 4't' 
switch i 

case l I print • break 

case 2 : print "(2 0" : break 

endswitch 

i cot * f ry 

> h $n, i * ? 2 co i & u “ci'" * ? 7°y > 
h^ns 0 ^nri^rii^c try > h 
4t' 0 

WO s^:£&£ffffl 

switch c 

case 1' • print " • break 

case ’2' : print * break 

default : print 
endswitch 

c (3in)cot »“!•'*>* 

* ? 7°y > h $ n, c COtt**' ’2’ (32 h) 0 t It 
“Ci'WJX'^n^o HUWtlli: 
“4 < ^/i"A ? 7 0| J > h Ml^o 

151]31 caseS©ft-b4 : 


switch i 

case ’1' 

print 

break 

M v^ M 

case ’2* 

print 

break 

[Z V ^ 


default 

print “it < 

endswitch 


I t |nj — COlJjli So 



fiE^CO BASIC "T lifor-next ;t/ —7 0j ^ 
while A?-71)' ^ ft it ffi 10 C gotoX 
LtZo X-BASIC 

C> tz ts tb I: ft i t t tz t> (D til lit 

break^ faX c' i i" Q break 
$ titz t & li, i' t) If A fiffiljc h s for-ne 
xt^^ — 7\ while-end while ^ — 7°, repeat- 
untile— 7\ switch-endswitchCD i ^(DCh 

tofrfttttbtOCtSfflLito 
if 0 

^|J[T] 4'break 

i=0 

while 1 

if i = 10 then { 
print “bh” 
break 

> 

i = i + l 
endwhiIe 

c (Dint' It i <Di&tf ioc 4 t 

^7°V > h L T while lit S teRB^—7* 

^ftltmto 

mu 

while l 

for i=0 to 20 
if i=10 then { 

print “£&” 
break 

} 

next 
endwhile 

w (Dint It i *noc?) L | f 

h L, breakC t o Tfor-next 7°^ft(t 
tfji"**', ^ Awhile U J: S "7° 

i IT' It ft 11 ft $4 1'0 r, S [Ti] C ^ ^ 

h jS1"o 


rnnlinuii 

continue li ^ ■— 7°k x A -y XX t> 4 » © 
Sflflfflfitt'-fo It ©break li k SWP'ff©^ 

f>-tf ZtzfiOb 
©TL 4 continue li t SflP't © »|r^n %■ 
#^L4i'**, 7°lit*tlf4 < 4i' k t' 

? ^'n'l-ISffl L i "fo for next, while, re 
peat-until©^—7“©'I’tTc © continue 1C 
kcontinuefUTli^ft? ti~¥, >' / — 
7°© 5tsl i:k--o r;4©^—7°* s i)fl te tai 
i" (for-nexfC'liSi&* ? 1 4'lf- t, ^ill L, wh 
ilei 4 lirepeat-until 'T'li^:f'kS* ! 'iS]^ i L 

a tL KXfr.m^L ito 
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era 

for i=0 to 10 
print ”i=";i 
if i=5 then continue 
print “ Z ZL ” 

next 

C. C0f#J'C’(£ i 5 CO t |, continue 1- 
* ? 7°y > b §n^ci' 0 

for i=0 to 5 
switch i 
case 1 

print “^£>” 
continue 
default 

print “ C?) ffe ” 

endswitch 

next 

zvmr'li i ij' ; i 0) t $izii W ky° 

y > b l, “£0ft!i” *ry > 

b1"*tt-f KCDfc&o switcher 

continue ? L*-y — li^ot L £ 9 0 

nii, lio> y i'oTX-BASICC>^,£>* 

t'liRD 4 < ^^cScc'MRfc t>x. ho 


goto 

#& 4- 7° n 7" 7 -?1tgoto 4 4 7 f It 

4 0i*/i. ccro*ttfcw>4-r. 

gosub 

X-BASICf lt[MH&Sf£«f l> 4 tin (>, 
4 4, ZOgos 
ubC lt!liiJRO<A s £t 4 t„ gosub t goto t 
|3]C <Stcf-®Si]ffiij£ft» 




X-BASICIt, 

£ii? (£». £S. •••) 

t tox, it 

14A ? 

-of, #4 

I'li, *t4Rlftirfr-5TflffltJ:ti ! 

7°n ^"7 5 i' 7 {1^1:4 D 4 -to 

-•^-♦‘S^Wft^t^f fflfcsftti’4 
4 fcii4t* •> 4-£A*>c„ uy&4£*t 
S#'(£* J £St:4 7T < JCD-Tt. f77 

4 y FMW*Hft4 £ t PH*©-* 

s' 11* 5 ***'!»«* £*t 

5; t feUKfeo 4-e-A. -'7' 

© r X-BASIC ©)1-a5Hft4rfrS j r.W L < 
f&ofl.'4t) * J , 4 4flt7°n^7 ^4> 
r'^lg $ n s im & c o t' t ftf-lli L T * 41' 
IJBU’il-. 
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It, 

func g|9ffi<7)I! M»*( i 3l».. ?l» 2 . 

...) 

t i'5®SC©Xi:t otWiti, 

endfunc 

11' pXciotftb 0 4 1*o f&fc© BA 
SlCf'lt, HtScIt, 

DEF fHi~y b i] 

L4o 4 4UtM 

&®$ H 4 -1 £f f. $ 4 it rut* 4 b 4 
i' 11' 5 CHf i' i ©f L 4i T , X-BASIC 
fit Z<D£? 4fc&ltWftS tvci'it. 
:;f “SHilOS-r tit, Hftciof 
&S4i4fit (»©{«£) 0f"-?Sft. 

J 4, “m 0 fitOS’ It, Z ft^intS!©^ 
iifilti: t* s f i it. 

<kr., “gift"©itJ£#ffi«r*Lii- 0 - 
tut, 

9 ltt«;9l*©a 

t 4ti.lt; 

func int zz(x1int.ylstr) 

1 1 ' 7 XltintS©9lftx t stra®?l»y £ 
#lj, intS*R!>ttfct4Mftzz«r£*ft 
6 4 t £ftl it, $JCt of 'jltSc** int 
£©*£•« ; UTfc*»&t * 4 t ff'S 4 

to 4ti.lt*, _h©Wt, 

func int zztx.ylstr) 

t IS] C ft o M»*‘£>fitfc;gt4feCltre 
turn&’ffli' 4 t» returnlt, 

return (M 0 ffl) 

11' 7 L 4 to u m 0 fit” 5? (t) 

-C'ffltfO£JSft4i.'t 7 i: l 4 L t 7. ?■ 
tif’lt, UTC^£4M»©m^L4to 

«mi 

func float average(x:float,y:float) 
return!(x+y)/2) 
endfunc 

ZV>mX'\t. float^O'll^Cx tfloafflco^l 
ft y 1>'C> , 2o L t ^ cofit (flo 

atSU) ^ii^T 1^1 ^average xiijS L T t' 

^Jg] 

func str japaneseinum> 
switch i 

case 0: return ( ) 

case 1 • return ( ) 

case 2 '- return ( “(CV^” ) 
default: return ( Vc < £//’ ) 
endswitch 
endfunc 

5lftnumi:Wfi61“6 0*»4r^tX^J (str 
§y) ^ffit 11- & IH Japanese £L T i> h 0 

§-C, X-BASICSIHftlifife*© BASIC 
f t' 7itf>—t If tf'Ifflf"# 4 t„ 
c«xittt*JE3 4i’BMic (M0ttO4t'M 


&) t LffiB'tltt.ix4t. :«trs 
ofjtoa" 1 1'7 loit^&Liwi, 
‘tn«rWi*L-cBft«r£ll-ri t 7 cl 4 
to :@ii 4 liy Set It endfunc CfiJiit 
S t ft JiljfitcItti tz'<k(J )-&cifiilW 
* s # *1 4 to 4 4, endfunc CfiJiHt 
HOC, t 4 4fecit, 

returnO 

ti'7**l^ffli'4to4tilt, 4cfc4i' 
ffi^fiSt 11' 7 4 t ft (gosub Ctat 
7'4 u — -f-ytr CyO)M •) 4return i 

ItSiJ^f t)o 

—fe^Cl'of, ROtt©%l'n«CU. 
f 7 7 4 -z ft > KMil, * 4 

t' itf y > h fr^trnwc^c f, z (dh .t o 

«&£•«<, W«r«|&t, 

V v 114) ©l47* J t;*4Jt-^cit-^tL 

4:t^i'iKt. IUTcfit?rjgS4 
4 to 

func introduceinamistr) 

print “flte" : nam ; “Vi~” 

endfunc 

4 Offljflt t-ttil (strS) ft i. bH6'}l 
StnamOHilf^C “felt” t “ft” ftltT 
7 °y 7 h t 4 liDSintroduce^^® Ltt'4, 

* * * 
m±, eitJEtr X-BASIC 4: S 

(a<ft, Ms*#) n# 

fci'tsi'ito r«, it; 




^ U S To L*'L, zos 

^ It [ t ] £ T^WC^T*# ^ cfc ^ 
oTl'^to tz£?U£, 
str nanno[4] 

4(7)srti!JS!^^l:wT^Z ^ , 
str kyonkyon[200] 

200(7) strm^^'M.wr ^ Z £ 

Ito [ t ] C<fc ^>3t^^lJ(7)^: 

$ <7)|8:^;fifi(J256^;^T'-r 0 
c 0 ct o 

; 5/cAPlzfflt,'«bn ; 5)(7)T-r*\ Z7)l5^i:v 
ZaTiUz^t'til^oTi'Jto t4't) 

■t,. strM(7)^^(7)^^ 

o^U, (!£l#gc7>^ 

3K(i 0 T*f) [ t ] T'©AT'strM^&(7)& 
*<nfem.<r>^*l7iJ*mLtz ‘J, 

str a = “qwerty” 

print a[3] m . / * ’r’ 

a[3] = ’t’ :/* a(£“qwetty”{i 4* 6 













BAsicub-ii- 

SliBASIC^HTS 

Shimizu Kazuto 

»7j< «A 


E#*--F";f ?KFnAo 7?-( 1 Tft(£' F 1 %, 

7>ttTO, iIi&4'7V-*Tf 0ktz o 14 l* ft (£4 iJtli4’i'c BASIC £ 

•^xT < tz£ oAt^lCIggHlJ: t- “S" C * *'*® 0/< 7 - 0ii 4 0 4 0 


$UFm*‘ f), g*£0BASIC4 xj yo y 
cta^'°y 3-x F* 5 '*Jift 
*6*4„ $At:(£t> c,ft4i'o 

c ft b 3I$£ 11' 7 £1 a 0 y-A0-*i 
4©4£5*-. 

ASIC tit ■T * ft, fi4 t> l£ h A 4 A i: 4 f> 
4i'£7, It&fcStitfrftoTBASIC** 

T£ 7. 

t L TStt L 

T sI£FORTRANt££0;«£* ? |£—5 
ftTft Hit Li'Pfi •)4'* t , MIX'*';? 
>©«©BASICS* SfSJg0tt—|4£f£ 
* o o {, «fl c £ o -ClittW-T* * „ US 
ifiib*‘0^4 3Vwr I "l34' FORTRAN t 
tftlf, BASIC (£ A fF1 n£i£ ft i> I>xl7 
7 7, 7A F"^±0£ 5 4#&404 o £' 
*> i t> bl&ilftX’bZ z t Cl£*ft D 4i'* 5 ', 
*‘ tt (£<■' 
x. 4 1 ' (41: &&ffiX'ttiJl&M&T'ffl-C'ft 
4)» BASIC® 7° o 7" y -? (£#^t:*^-C* 
i>o ti-S’C’VoX&t'tif'b Lft4i'oF0 
RTRAN07°b7"x-?!£ ., L'oUCft 

t Sffc4©-C'* S ('>4 < t {> 6 
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A y — y"--R—7u 2 ^-itir. I, Hi.'©4*4 
0 x F 1 SST* ?> (£««) 

10 LINE INPUT A$ 

20 KEY0 , A$+CHR$ ( 13 )+ ,, RUN*’+CHR$ ( 1 3 ) 

30 END 


•7°p 







y x 11 vti 

3-v — Cifi', LOADCisH\NEWCggt.', 
I A-1, k 58 i 9 t L TIA4f<tt> t 

©li if 9 A'A 9 . i) 4-lffi 

ffl4ftf1®»(:T S i •) li, :0H£<: 
HAft'li 9 A f f D*K£oi<-ci'£©-f'tt 
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BASICIfi' AC' ^fslio-Ci' S 9 IbCftA 1 
oT<S 0 -^ilTeA'C fe'M-'i c,ftiC' L, 
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30020 LINE INPUT REC$ 

30021 IF REC$="RECALL" GOTO 30200 
30100 FOR IREC=REC TO 2 STEP -1 
30110 REC$(IREC)=REC$(IREC-1) 

30120 NEXT IREC 

30130 REC$(1)=REC$:REC=REC+1 
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a -x 7 K, 3 a -7 7 l X 2 a -7 7 K' 

®c J -f 0 ALLli 7 77 — '<yf-Cf, s„ 

t Z A A'-r* S o '<'7"A ? f < a 1 , h 7°b 7" 
7A-T'|i*SA f , t'ftt/zi' L/:z t 4‘C' 
tJBotl'fcC,, +RCA»A*ftS 
7"j A ! (Hoi)7t:0t:'o *"-7, Sft-f 
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30000 DIM REC$(100) 

30010 REC=1 

30020 LINE INPUT REC$ 

30021 IF REC$="RECALL" GOTO 30200 
30100 FOR IREC=REC TO 2 STEP -1 
30110 REC$(IREC)=REC$(IREC-1) 

30120 NEXT IREC 

30130 REC$(1)=REC$:REC=REC+1 

30140 KEY0,CHR$(30,30,13)+"G.30020"+CHR$(26,13,30,26) 
30150 END 

30200 FOR IREC=REC-1 TO 1 STEP -1 
30210 PRINT IREC;":";REC$(IREC) 

30220 NEXT IREC 
30230 GOTO 30020 
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"INITIALIZE" 

30020 

"INPUT" 
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"COMMAND" 
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"RECORD" 

30050 

"KEY0" 
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END 


30100 

LABEL 

"INITIALIZE" 

30110 


DIM REC$(100) 

30120 


REC= 1 

30199 


RETURN 

30200 

LABEL 

"INPUT" 

30210 


LINE INPUT REC$ 

30299 


RETURN 

30300 
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"COMMAND" 
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IF REC$="RECALL" "RECALL" 
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IF REC$="" RETURN 30020 

30399 


RETURN 
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LABEL 

"RECORD" 

304 10 


FOR IREC=REC TO 2 STEP -1 
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REC$(IREC)=REC$(IREC-1) 
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NEXT IREC 
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RETURN 
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RETURN 
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ft. ft ©ftB ASIC© if ft* ft I ft lUfliJi: Ao 
ft ft faff £•fid#]0LIST$t-f&fflLti- < © 
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ft. If 4 ©if ##*IR 0 Hi L, 4 C © LIST 
4HsCo ft KEYO t LINE INPUTi: i o TO 
LISTS C y X h©X1=#|ftA4©ftfaft4 
rt?>7. KEYO li z © i 7 t:;A'i:*Sft 4 
INPUTS 4 E i: l $ < ©44 £ 5 CKE Y 
OliAPSJ©JHtfa y t 4of4-t'- K* 1 0 
®Ai4^Ui^-It50T<b5. 

•xAIP:©Ain] i> E S, »il'lft<-X>© 

3 t“- b 44''7 h ® f 7 4 {) ©T"* 5 o 
7"D/7i©|ft li“INITIALIZE”©4 1 

roLisT$©idyiia:a t iolist © y -t -7 

0 X h 5 t U*>x-f©5Sfi!cl{& 

1 ’Don’t DELETE 30000- 
30000 ’LIST-5 
30010 "INITIALIZE" 

30020 "INPUT" 

30030 "COMMAND" 

30040 "RECORD" 

30050 "KEYO" 

30099 END 

30100 LABEL "INITIALIZE" 

30110 DIM REC$(24),0LIST$(24) 

30120 REC=1:I0LIST=1 

30130 KEY 3,"GOTO 30020"+CHR$(13) 

30140 WIDTH 80 

30199 RETURN 

30200 LABEL "INPUT" 

30210 COLOR 4,0 

30220 LINE INPUT REC$ 

30230 COLOR 7,0 

30299 RETURN 

30300 LABEL "COMMAND" 

30310 IF REC$="RECALL" "RECALL" 

30320 IF REC$ ="" RETURN 30020 

30330 IF REC$ = "OLIST" "OLIST" 

30340 IF REC$ = "LIST" "LIST" 

30350 IF REC$="NEW" "NEW" 

30360 IF REC$="RUN" "RUN" 

30399 RETURN 

30400 LABEL "RECORD" 

30410 IF REC$=REC$(1) GOTO 30499 

30420 FOR IREC=REC TO 2 STEP -1 

30430 REC$(1REC)=REC$(IREC-1) 

30440 NEXT IREC 

30450 REC$(1)=REC$:IF REC<24 THEN REC=REC+1 

30455 REC1$=LEFTS(REC$,1) 

30458 IF REC1$=" " THEN REC$=RIGHT$(REC$,LEN(REC$)-1):GOTO 30455 

30460 IF REC1 $> = "0" AND REC1$< = "9" ELSE 30499 

30462 DUM=INSTR(REC$," "):IF DUM=0 THEN OLIST=VAL(REC$):GOTO 30465 

30463 OLIST=VAL(LEFT$(REC$,INSTR(REC$," ”)-l)) 

30465 PRINT "LIST";OLIST;CHR$(26) 

30466 KEYO,CHR$(30,30,13)+"G.30467"+CHR$(13):END 

30467 KEYO,CHR$(30,30,30,13):LINE INPUT OLIST$ 

30468 DUM$ = STRINGS(LEN(OLIST$) ¥ 80 +3,CHR$(30))+CHR$(26) 

30469 KEYO,DUM$+"G.30470"+CHR$(13):END 

30470 IF LEFTS(OLISTS,1)<"0" OR LEFTS(OLIST$,1)>"9" THEN 30485 

30473 FOR IREC=IOLIST TO 2 STEP -1 

30475 OLISTS(IREC)=OLIST$(IREC-1) 

30478 NEXT IREC 

30480 OLISTS(1)=OLIST$:PRINT CHR$(30); 

30483 IF IOLIST<24 THEN I0LIST=I0LIST+1 

30485 COLOR 4:PRINT CHRS(30,26)+RECS:COLOR 0 

30499 RETURN 

30500 LABEL "KEYO" 

30510 KEYO,CHRS(30,30,13)+"G.30020"+CHRS(26,13,30,26) 

30599 RETURN 

31000 LABEL "RECALL" 

31010 FOR IREC=REC-1 TO 1 STEP -1 

31020 PRINT RECS(IREC) 

31030 NEXT IREC 

31099 RETURN 30020 

31100 LABEL "OLIST" 

31110 FOR IREC=IOLIST-1 TO 1 STEP -1 

31120 PRINT OLISTS(IREC) 

31130 NEXT IREC 

31140 "RECORD" 

31199 RETURN 30020 

31200 LABEL "LIST" 

31210 LIST 2-29999 

31220 "RECORD" 

31299 RETURN 30020 

31300 LABEL "NEW" 

31310 KEYO,"G.30000"+CHRS(13,30,26) 

31320 DELETE 2-29999 

31330 "RECORD" 

31399 RETURN 30020 

31400 LABEL "RUN" 

31410 "RECORD" 

31420 GOTO 1 

31499 RETURN 30020 
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*oT, L*“I)X^iJ* ? fi47Ti'S t 5 
X^lgls^-ri' I)©AA Z0)^A.(D!)S:M& 
vfcboXli Li'o i A, “RECORD” frif 
^tS, *^TS4C^^##ftotfCi'S 
0 t n—/*L>r* S„ 

11'7 ftltr, ^'7"A"ibl Wbtfiio- 

t 9 i**9rn7'7A**ge)«J£AU4ft 

0 7 a crs Ao s nr* t ias.i' 
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9 X t 6 TVHV> K0iitw (X1/X1turbo0A) 

30370 IF REC$="TV" "TV" 

31500 LABEL "TV" 

31510 CRT 0 

31520 DUM$=INKEY$:IF DUM$="" THEN 31520 

31530 DUM=INSTR("13468/-",DUM$) 

31540 IF DUM=0 THEN 31590 

31550 IF DUM$ ="/" THEN DUM$ = "10" 

31560 IF DUM$="-" THEN DUM$="12" 

31570 CHANNEL VAL(DUM$):GOTO 31520 

31590 CRT 1 

31599 RETURN 30020 

l ) x b 7 KcoiiAn 

30380 IF REC$="CHANGE" "CHANGE" 

31600 LABEL "CHANGE" 

31605 DUM=1 

31610 INPUT "Input old text:",OLD$ 

31615 INPUT "Input new text:",CNEW$ 

31620 PRINT OLD$;"=>";CNEW$:INPUT "OK?(Y/N)",DUM$ 

31625 REC$=REC$+CHR$(13)+OLD$+"=>"+CNEW$:"RECORD" 

31635 IF DUM$="N" OR DUM$="n" THEN 31610 

31640 SAVE"DUM1",A 

31645 OPEN"I",#1 f "DUM1":0PEN"0",#2,"DUM2" 

31650 LINE INPUT #1,DUM$ 

31655 DUM=INSTR(DUM,DUM$,OLD$) 

31660 IF DUM=0 THEN 31675 

31665 DUM$ = LEFT$(DUM$,DUM-1)+CNEW$ +RIGHT$(DUM$,LEN(DUM$)-DUM-LEN(OLD$) + 1 ) 

31670 DUM=DUM+LEN(CNEW$):GOTO 31655 

31675 PRINT #2,DUM$:DUM=1 

31680 IF EOF(1) ELSE 31650 

31685 CLOSE #1:CLOSE#2:MERGE "DUM2" 

31699 RETURN 30020 
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? o 

c 0 liA‘i: t t -o 

(oHUntfc 1 ), 4tilf7ioyf- 

-V— • -?)Vj)— yuffi (t't, 

E> 4 4 t'<> ix-C t.' 4„ 

1*11 0 ft If -7 ^ t - L 4 

BASIC 30M7«rfflbt5 0 ft-# 

mt* o 4o Mi:4 4i ! , Z 0 ft^liB 
- to y 'yM&b'0.'A L4 4 04 2 -?*&£• 
n-a-4fc0-r*4:tift-rcjt^4„ z 
0 4 t If r ^ 5 - <7 AX t° y 04 tnfi 
2 ?t)i;t 4?Hnfc IT is*), mtX 

0 -Si 5 lf^fS^«^i:, a*) 

»:*44»t'lf4i’* , t#iTi.'4o 2 ? 
0 B - U y >yft^ 0 ^c §! S 01 ^ 11 ®^^!® 
Ii:f4*te ft'JC*i£?rfotffL 
< 4e t i:f n4t»t' 

f?4„ 

c f 4 r"- * 0ftW i: -? i > r 
§ 4* s , 4&t L Iii'b“ 

Xh 4 t If fig ®4t'„ teWtS0ftai]4 t% 
^* s iE0i?>*|i L 4 lf#t“*i£ 
lfffifflt'S4i'„ 14, IMIftt 4 r"— 9 © 
IWJJUI4 if 4# L < ,HS]^4i'0t*nif7- 
y 11' ? tit 4 in 1 - 4 if ? mm# 
f i>. r'-^irnr’to t ujtft4f-?i 
00 t o* 5 ffi'J' — if?it40XTt 4 t ti4 
E> f i' 4* A ? o 

4te, S^J'“Jftit© 7*n/7<y Sc 

i: -? i' x fin** 5 * nif* 

r"— 9 ffit/f-71 n i [ Y-X 9 ^ 

mm, 

tx!'xm£ f 4 mmr- 9 aw 
(tJH-'J'W, t4,tlilx^) 
4£‘4##CLTIf U'o 

il»3£aifl864t-i:^^y ^ t 7 9‘U xi: 

fo-cMSWt 1 ', ^©fS, 

4Kffi L Ti?i 0f-1' 4 It i ' Ji tft 1 1 1 14. 
r — 4W]i.'TIi4 , fll4j i i' ?ld* f *4* i ', 
t"— taw4 It? c 11- f y, ft Ezhi)' 
^’©^KS iWJ m» 4:t XX% 4©f 
A4, 

<>:iaif 7 7 * ^ftftt 4 7°B r'7 5 y*" 

I - 7) l ' X i 4 o 
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ttm&jjj-i/yu-n 

Izumi Daisuke 


a 

4 ft^rb'b 4 0lZtA-oTZ8O®*i;g*Pf&£S?ia IX $ i L4„ 
t/ia'b(iZ4iJ:±*®Hop to it&ffiALTiSrv')-X(z3SAl 
ito $fc)! i TIC® LI±lf420(@®3>^(Zj!!P;iT, 
ft5i *®oir'tel'S t8?l& LTI2 UiiAT 

l'<f$tto ifc, LTt A,B,C,D,E,H,L(zPM 

bfi:, &V« b £X 4A,#llffl Lti-'JJta i ‘Jt^Cio 
XTZ7-'y77'y tl £ L a n 0 
i#®K£Bliffil?lB4'o4©**, 77^X10 
®^xf-fcp o 4i' tfio/:: 
t«*<) i-e-A*-. ei0#©*w^-^l5; t a f t±t 4ili*, 
-l A 4'!s£|i'l {> t (” (- L ii" 0 fES^t© # w > ft — t (ExiLt 
47Jt®*ijffOllRRUT, 

jgjjrf 4t^-t>PRM0Nfcft>) i L4o tJ i mz©PRMO 
N fcflio T7jt®t ToEKSt il^. 

101*^110? 

±rt®t^4 t £<:|ft*r(:£>!?4*plit LT, 

IlMMA^WiJ 4©a>fc&£t 4#&a f £> lit. Jfftoi: l #- 
4 365 B I@'/e 4' tit, )l OtOfeOiH tiiitt 5 A T 

AiLi5. 

a©fcji4>©flSB tfc£t s i:(i®®7ctl E l a*• e>®BSet 
ih, tnt7-rfUo4-^i; a®7ct 

1 oti'i t*‘f>, 7T'fUo4sfi*>a , l 4 

jj ma, 6 4 c,±iia 4 tfjaEf'isfe(t±'±o ±-1 a it, a® 

mt© n M i s MHl LIA'iLtes 5 ©4 t*P 0 4 t)4l(4f, 

(m-1) x365+[n-lfl if©BSc] + l 
t lt, a®7cta*t>©BSctjfmu tnt7-r«iio4^t)t 

4-Jig«±Sifr<fr4*>(181§) 

LD (I£A4l4„ r LD(9876n),Aj T-9876H#«tCAyA5 

CALL i tlb-l-y’kn-:*' r CALL NZ, #NLj US >ifa tt <j #NL% 3 -Ati 

RET V7JU-?>t)'C>'MSo r RET Cj li* +') 7«C4!»4 

PUSH Zt-yflZL •yJJBfi £!£#? 4 „ (ex. r PUSH HLj) 

POP 7.? -y b ft'bU vP. ? Cie&K'J ttiT. (ex. r POP DEj) 

XOR A=A XOR m, m« IAS>X? £fc(48(it 
OR A=A OR m 

CP Atm5ritSiT%a g*U77Ti:S2i 

ADD A = A + m, HL = HL + rp 0 rp(2 U v * ? ^7 (HL, DE, BC) 

ADC A = A + m + cy, HL=HL+rp+cy 0 cy(i + 7 *J b 1 
SUB A=A-m 

SBC A=A-m-cy, HL=HL-rp-cy 0 

INC r = r + 1 0 rlJUy^^ (B, C, D, E. H, L, (HL), A) 

DEC r-r-1 

JP BASIC<7)GOTO(;49^o r JP IFFDHj (ilFFDn^v 7 >7T£> 

JR 

DJNZ r DEC Bj r JR NZ, ~j £ 1 1^T1 t7 0 7 7 L 

EX r EX (SP).HLj 


IRniJfcR i i) £ to 44" L, Z « 179 ±© 7 f] ±'H 

SC**HLW -y A * C A4f*Afi465535i'SiTUi'i ±0±, ff 
4CHLxDE = HLDEti .'0 J: ? 4 a#Jt$>-±y tffljtlTt 
C> 4(1411*4 & 1*86 < * 6 itA„ t Z-r!5'!®f-t#i±^i 

to 

(m-1) x365TlS® 7C# * • f.m-l^i'COBSetiilLT^oT 
{> if o 7 til]-o X £ 9 t IS]^ 4 ©ft *■ £>, 

(m —1) x (365 mod 7) +[n~ lfi i t© B Sc] +1 
t LT, :W 7ffl]o4& 1 ) tilie-o-T 6 £ ±A„ 

Z t t:(365mod7mi-t'±A‘C>, ZCOS;ii$ C, C 
(m-1) +[n-lJ1 lf<D BSc] + l 
t #*i:ts z t i to z 417* c, 4 t iffi® 5 X 

L A'i^cTT t i)' *o U4'5 t <■' z. & X L £ i a 
f> ut t (jii t nt4, ffit© h a *• 
SOA'^T^S; ito H¥4 e, 1 #-©HS: 

* ? 1 Bl^iit*‘b, K0)jKr-mq-£X’<Vffl¥<D®%(.$f1]nz.X? 
6, ? 4i t 7 t'fi|o4^ <) t3ji*4H4i't.'C7)-r'to -oiO, 
(m-1) + [mt- i fOUa^OESe] + [n -1B i t'® B tk.] +1 
11' 0 SCt'*»4S : x. t 7 -TfU 6, ^ 0£ 6 tPH 4 4 t lift. 

* z Tmf i t©w¥®ias:ti^ s umxr-to ratii 

1) a®* ? 4 -Tin •) to4i 4 4 c, rat 

2) 441, 100-C'*I| 6 I3J414 4 

3) IZ4 ti\ 400t'*l| 6 13)414 4 lit 

t omAr.fiioX'MoX & 11„ -rttt, 

Yl=INT((m-l)/4) 

Y2 = INT((m —1)/100) 

Y3 = INT ((m —1)/400) 

tt4xlf r Yl — Y2 +Y3j * f mti-r®Mt®Hli!ci:4 6 ito 
4 t iff, i987t£Tr'<:fn7®©Kt* ? £o4®*-t ztxr.^x 
tWt 4 t, 

Y1 =496, Y2 = 19, Y3=4 

ft** (496-19 + 4)®, t4±t, 481 HI®|lt* s *o4 t l'0 

z k i :4 4 hinr'to 

1987t® 1 H 1 B4MBSB 4;©*>tf^ 
TAi L £ ?o i t(m-l)lil986-rt4a. t l T1987t i T'®|HJ 
t®®&li481H] 0 (n-l)B i-r®BSclii.’in* f l-rt*-^ 0 o 
i 1 tJPiito 1986 + 481 + 11£2468 0 Z4lt 7 4*1) 

o ± ?■ 9 tTlt* 4 t 4 C4* 9 i to 4 litBiBTT'tTao * w 

< 4'§i'. «#*•(:^W!B#*^ift 

i o ± i' i t4a» 

1 B ®BI B t 4 U&tfbii'-o 4 t z -r;A®S a t: 6 i 
to ^4i't LM/o /7 jAAtr -fc >t'7p L X 

*■ ii^fi-t 4 11- 5 ®liflf/t-t"li* 4®-t't*' ; , f i t> ■?* tf 
to BASICTTY°n r'9 A tft4 4 C, {, 1j b t— K 


Oh! MZ 1987.8. 



A^FH£AfjlT(> £>7 if eft 9 it too 
5tJ:tclilJ; A 

#GETUb-*>£®*3 

S~OSCIt A—t—F*‘k 1 ItA* 3rIY 7 #GETL 
T 7 * f * 9 i t. 4 nitBASIC©LINPUT (LINE INPUT) it 
ttHC: t fct f-vt'fo BASICfO^-g-liX^^cM 
AiiA i L AT, -v i/Vfk t:ItX^KSDi F* 9 i -tt A*- C>*lfcA 
ii£/7 FAx£ v-Tx^TiftSIt'ps: ti:((Ht. FOi 
7 clft 9 jiA*Mf t>n 4 ©*'lt-A : |i§(Uikt L TALIi 7 A* A9 T 
ti'Tl & 7. <k<D7°vyy AfrZIMPLTAft Lt( AS A. 
8000 11 00 90 LD DE, $9000 
8003 CD D3 IF CALL $1FD3 
8006 C9 RET 

i ft, SOOOnffWi-C'AJj ATAil FTR 9 jit/7 F ^ x fcfgg lit. 
(AC, 1FD3 h© #GETL xv—f-V ff-C/fij L T 1 ff A* SrfiASS*- 
T A't„ 

f tnrum? l tat < a's a. £®±Tj&- y ^iusssl a 

ASft&LTi'itfc. 4 c. T r 012345j UilL-CAHJ;?. 

A* it y *->A-T&7 Lite &It lT)A0lf©5fes!Tt- 
y^AA^L Tl' i tfo. Tti4 4T'x> j'Vjg+t—7 
* y ©1*1 ^3?® IS LtAit. |W||ftP© 1 Ift 9000 h #!&*' 

9 jit/ i 7 Li LLA'fi, 7 A y TV7°3 -? > FT" 9000h # 

il!l©l*l$3?SjSS-tiTAT < A'Si.', 

9000 : 30 31 32 33 34 35 00 . 

Fft^Snit. 301i> 7 ©It “ 0 ” ©7xA-a-F, 311 1 ' 5 
©It “1" ©7 x A-3- F 11' 7 AA L AAftcttt 

5 7X 4f~a- Fi'Ii:AoTi> it. Ht 7 o ^©OOavSCft 
fllliw 4 THAU 9 A" ati© 7-tt't, At] L A©liffit*'C 6 

X¥ T Ltzt'C, z nT'-ft-otoitb. 4©i 7 CA —AAfflC 

fl| 9 =!i T A 7 T y © 4 F3rA-AA'*7 7 7 fftfit. 

A A lt y *-vA-AUT'liA < 7Vf 7 A -T**7t 4 : t 


LD A, (DE) ; A-A A'* x?r ©AMX'A^ip 9 ,T, t 
SUB ’0’ ; =SUB 30 h 

t Lt'pi : ttAi/ Tx^cit&t 4*!cffi r 5j £I#4 4 t* f T 
lit. 

2 frjTJLL©£Scftt5:l&t 5 11 eitftAAiAHD' it. it 
4-^fo m, : Lit. :mtJ:©Ai£ 
T'T'I i tfe. iAu t> 5 tt fctfrfto Tit, 4 n^&ftfc ii^4 
© S Aft10fS L A £ x. t: i ■ i Ff -o T I A A Sett C L T JE, 
lit. Iffll^o-CftiLli. r l23j Sf^KslTAit. 

i TA§S©Aft “1” fcSeffit: ft: Lit. ft ©Aft t ScftT't *■ 
t. zntiots-t 4 tio. “ 2 ”a icfifi(71;i t mt t i2T'T„ st. 

Cft©*ft (,^T't*-ii^t|5lC^«T'^t4 t, 1211 Of* 
LT120. 4 4xt:“3” t SttCilk; L Till i T123 t A 9 i t.Aftftil 
It 4 nT&Tfti'^i It l23Ttto. 

:©tfc9 i: A o T i> 5(9*!!) x F 1 

T't. 4 ©Hp7V—fty ltS:ft?i]a J A^ Ti’ 5 A*'<'7 7 r©A 
§17 F w x ADEN txFL T'tcFtf. L i t. r tGETL > 
Hiii j T" Fi A Del A All ©Lift it 00 H T'tfh S:t 
,T, LTfci'T < A'51'o 

it, 14 HtT'®x. A A(x5 w Dx If HLAtL/ffi-ftL i t. £ L 
T142-147ifTA<7 7 7 *• C 1 A’tKi 9 {fc L, C F I 

*■ ALit. IF9 /I', L At- 1?* s Sc4 : A'o A*#^-t:It 148 If 
cl it. c w-Tlt*a&©IScHLS?10f3l, fnc»C9ffiLAX^ 
ASefite®^LTint 4 11' Ifea4rftt.' i t. 

r ADD HL, HLj !t|0] C t> © A 2 *JB L i t *• Z , C nit 2 fg 
t 4 © t IS] C - t T't. 141:45 -® r ADD HL, HLj k%\l 
t 6 t 2 ft L A 4 ©£ 2 lift S ©T't* 1 C nit 4 lift S © t 
IS] L C tT'to rS] C Itf T 8 15,16f&, 32fS l , r ADD HL, HLjA" 
UAfa-o-Cft^C^oT^i C titlita, T'ltlOf* L Ai' 
11 cit f 71mtvi'T'L 1 7. emt 

10 XHL= (8 + 2) XHL = 8XHL + 2XHL 
L$ZfclT, 2fg-1 8fS-©fll©3flt: LT^nitT'i^Tto Tit 
y x h A at < All'. 148~150UTBCCHLX 2 ^Adit. 


1*9 it. w©tl Clt A —Aln-f 7 77©A§lC 1Bh* ? #|i 

iiinsz tcAoTuito {> I-S:®7"n/ ta^^ItL, 

tflt7Vf 7TWT L TAT < Ali'o 77©A§1T'*5 

9000hC1Bh* 5 'A-oTI' 5 fL i 7. 

i A, iSiSc r Input Year:j t L TSdf+ttcB@A A 
1) ? -It 5 t, '*777 C lt*^ L A r Input Year : j t> IX 9 ii i 
nit. INPUTT'lt A < LINPUTT* 4 C. t Cit^LT < A J 


Hi: r ADD HL, HLj A I* 9 IS L, 151, 152HTHL = HLx 8 
A^*T*%AliFBCCflS(oTi»U'A r HLx2j A 153 If T'SlI F 
nit', A- t HL = HLx 10 ©T'|i ** ? 9 T’t. 

155lf ©Hf *T'AClt'<' 7 7 7 L>W. 9 L Aft^^AoTl' i 
t**C>, wn**f. “0” ©7x4-3-FA^U'T&t-AWiiLC^ 
UXhi »^4r»fflt:S:»t5 


l'o 

C©t 7 CA-t- F*-iL©Aliltt^T7 xSf-=>- FT'A 
9 it*Mi, ftflLfcAfct* t iCItA^U^IScfitCittxw—7 
>^ft^Tt > f»7 J ,-unit'7 J r 9 i-tA. T'ltiAc, l^l^Mi: 

ItJffiCoi'ftoBL l i L t 7. 

a¥*»«=s«rs 

i t*^ c, 0-1 It © A SSefat c t 4 l?ii 4- # i T A i 
LD, 7 X A —3— FT'lt “0" * ? 30h, “9” *• 39h t i' 7 <" * i' 
CJliJ+i < S4tf/fTi.' i t. oi9, o-Lffi<D$C$%$mr. 
3H^t4Clt, S4©7xt-3- F*' c 30h ^^li'Tfnitt 
i '©T't. At tit. A—AAu*7 7 7 HFoTAT £ C C35h 
* J «| jiAT*nit, 


80CC 

80CC 

80CC 

80CC 

80CC 

80CC 

80CC 

80CC 

80CC 

80CC 21 00 00 
80CF 1A 
801)0 13 
SOD 1 FE 30 
80D3 38 12 
80D5 FE 3A 
801)7 30 0E 
80D9 29 
8 01) A 41) 

801)11 II 
80DC 29 
80DD 29 
80DE 09 
80DF 

80 DF 1)6 30 
80E1 IF 
80E2 06 00 
80E4 09 
80E5 18 E8 
80E7 
80E7 B7 
80E8 C9 
80 E9 


132 

133 

134 

135 

136 

137 

138 

139 

140 

141 

142 

143 

144 

145 

146 

147 

148 

149 

150 

151 

152 

153 

154 

155 

156 

157 

158 

159 

160 
161 
162 
163 


CONVERT CHAR TO INT 
in : DE = Top of BuTrer 
out : HI. = Number 
brkn : AF.BC.DE 


HL,0 
A,(DE) 


ADD 

ADD 

ADD 


CONV2: OR 


C, L 
B.H 
HL, HL 
HL ■ HL 
HL.BC 


C, A 
B.0 
HL.BC 
CONV1 


*2 

BC=HL*2 

*4 

*8 

*10 


HL=HL*10+A 

Check End Code 


V 
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MLito 156~159ftr"zni’BC(:=‘ t°-L710j£lAHLt:j!lll 
i, fcVKLfkW i9ifaL7^»7 4Aac>'i'-7L it. 

ifcC'*-7 7 r *• t.Jfx 9 ai L t $ ©JtGJl 

S?#i i to UJCiaiLAX^**OOli /'oA U<oZ MZA jjX 

^w©»fc*>A.'ti'5 w t-rt*>f.is^7-rto fW0X 

^f^i:|j;i7-t L 5 ®* s 161 

ft© r 0R Aj 77 „ IK 0 ,‘i 1 , L Aft* EW0 £^* { OOh ^:: 7' 
-t'n ^"7 X"*M£t> i1* L, {> l £ ftlU^OX^A'-o A &• / >-fc" 

n t 4 H t. 77 *’£>;< ■7v7li 

LD DE, BUFFER ; •>< -7 7 ?’ 0 Aiffi 7 K i/Xy-t -y L 
CALL CONV ; XDWtflh L 

JR NZ, ERROR ; / >-t"n 4 C, 3-y — 
fci'5 Cii'U^aLT^ntf, XJjLtb ^ASc^IEl*’ 
-»£■*• f 5 6 urto 

162lTt'IE^7* > ^^7* > 0 7 7^5f^oT 'J J? — > IT, 
C0NV;t/-^>li^7 L it. 

7lii' «U' J: / 'i -7 ><DW\tl-& 9*’*’ HU0 * 

v- > **— 7° n y 7 a 0 JJtas 1i, 

1) afci’B*. H S?AJj 17 6 c, 7 


i L7 1 ^Ao-U'Jt. 

• 2 B0Bm<7)$t% 

2 n 0 B ft S? 7 4 0 ii ii v- vtf- k ^7 5 7* «> A* U 7'li 

t£ <, ft J ) ©I* B 0P1 B Sr&£7 6 7 & i: 6 £>*& c 177 „ 
*fSi:r n 77 a 77 S;t li#?&'(:ff?j'|i A c fc 77» AJj $ 
nAYEAR* ? pg^*>f 5 * > 0-fJ|Wr5f77.171'0077* 1 iio AH 
ft-oA#l 1 $Ov'-7>DIVQ(iHLS? 127E1T0^7WUSC t Li' 
7$ £74.07, YEAR** 400 7flJ 7yj7S*'i" 7 *'7Wi75 
Z t i£7&£7A„ *'h-'37, C0A»/7tti:8ij0£lJU#-'i'— 
7>S?)HS!;7S0{> S'-* ^77. * Z7U'07 7 fcLfrffifcffli'T 
MiA7 4C tl-li Lfco 

1) YEARS? 4 7iU4„ & 9 *5,77177^ 

2) l)0gx.S?257SU„ jfe5**ffi7J7M# 

3) 2)0^7 S’ 4 7M4„ 7 0 * s ,7 71777- 

ii 0 L 7II L i > 0172) 13)77„ 1) 7=fc 9 **/tt 4 (t 7I7YEAR4- 

4 0i£S? $ c, C257*IJ YEAR 4- 4 4-25 t 7 4 7 It 

7'7 0 C. 717 YEAR 4- (4x25) tPlLCt, o £ 0 YEAR4-100 
S?ft3£75: t CSC407'7o o©i|g*& 1 *W<cit7(7$ <61: 
£0ffiS? 47fl) 0 £ 7o *1 1 YEAR 4-4 4-254-477„ C717Y 
EAR4-(4X25X4)= YEAR4-400 S?ftlT7 40 fc|5] L' C £77 0 

57/n77A0imS7Ai U7. J/xM77o i’i 

it-s A 7 ^7!) X'A £to 6 cJltULS?;!* £ 7„ J 74277YEAR 


2) ®^^fx'/^L2fl0BS(^St4 


SfHLCJR 6 ffi L, 43, 44ft7c: 7S? 4 7#l 0 i 7 0 liAC A 


3) IL’1’H0 1 B0WB5r^7S Ox 12 #J?0A0 

4) AH 0PRMON^—fyS’l-o T * w 07'—S?S^7 4 


5) Sij0 H £££*’£'5 *’0«fii& 

11.' 5 Hi7’tT<.' i 7o loOto£Ti'HUi. 

•*M0A* 

0 x h 2 * ! 'c :i:ft^L i7. l~9tT(7c.07”n7'7 a 7'^5 
S&4'^L7i.'S t Z A77„ 12, 13ft7'H®5? X V 71, i 
7(i0®0AJj*'t>77o 15, l6jT7'll'iirn'(:®/i ; 0AJiS?{E7 7 
77-^'SraiJjL, 17, 18ff7’#GETL5rffio7B»S?AJjLi 
7o 7— Aj]'*? 7rli KEYBUF h') €mi7'X°o A®l' 
4)(7A^AC < oolfti 0 i7 0 #GETL^ —7 0liDEx 
^0f*3W^®J*L £7A,*'C>, ^0^ £ 7 <* CCONV/’i'—70S? 
19ft7BfC/tB 17^4; t* s 7$5 077, 

CONV-7 0 7S7 k Xf r. » L A £ 20 ff 7 ^M* f iEf; C 
172*’ £ 7 *’S?7^. 7 ^ U 7o / 07"n 4* iL>^4X-7* ; A 
oti’4 t 0 7 - t7'7*’f>, t 7 — ®C®i ; 0AJjS? J ? :> IttL i 
7o £ 7 7'4U7I7HL*'’0*’£ 7*’S?'HMl i7„ C7(J7 H0 
*v0Sr'-i:llf7 8H0^0 07"-S?AAH't (’? i $ C, 0 
t>i7Ii*’ t AJj LiH$ 4‘ < 7 6 i'i' 7 7 Ct(’) Sillt.*’ c,7 
7o 'J S? —07-0‘AS?ffl l 7 £^<0 7T0AaKc 00n * ? A 9 17 
*•0, HLI1O0J Jf^t< 4077. 21~23fr7'7i 5> X L, 
HL* ! 'O0 t $ (:liH0A7jC)FU7L i 7„ «• ?T'4 tmiTYEAR 
tiO 7-^C*^LASS»S?-t -7 £ L, $e 07H 0AJj i:A 9 
it. 

H©AJKAAJjS?t£7X ?-fe-^'m-5-Ci>4: t t, 12H 
i 9±&4HttSU#U7j:(,' i 5i:L7i'4t: ft**H»0Atj 
tl|7j:-3 7i.'SA'lt7'7o f®^7'707'J&^7ft7 <7£$i' 0 
C0J 7 CL7ffietH0AJj* 5 »t)4. tjamiiYEAR,MON 
TH0 2 o0 7-^CAo'Ci.'4>(ift:S’ 6 t C7°oX"0 AS’li*7i' 
M7. o i 9 B» t> L < li H © AJj 5?^"& L A t $ C litJ.fi A 
Jj L 71' A#:* ; tI'$Jj (: 4 4 07'7o 202-707 — i^c liJ/lWHifi 


0000 

0000 

H000 

8000 

8000 

8000 

8000 

8000 

8000 


1 ; CALENDER PROCJHAM 

2 ; 

3 ORG 8000H 

4 ; 

5 «PRINT EQU 1FK4H 

6 #PRNTS EQU 1FF1H 

7 #MSX EQU 1FE5H 

8 #GETL EQU 1FD3H 

9 #FLGET EQU 2021H 


8000 

8000 

8000 3E 0C 
8002 CD F4 IF 
8005 

8005 11 AC 81 
8008 CD E5 IF 
800B 11 EF 81 
800E CD D3 IF 
8011 CD CC 80 
8014 20 EF 

8016 71) 

8017 B4 

8018 28 03 
801A 22 EC 81 
80 1D 

801D 11 B8 81 
8020 CD E5 IF 
8023 11 EF 81 
8026 CD D3 IF 

8029 CD CC 80 
802C 20 EF 
802E 7D 

802F B7 

8030 28 07 
8032 FE 00 
8034 30 K7 
8036 32 EF. 81 
8039 


10 

11 SHOE I: 

12 LD 

13 CALL 

14 ; 

15 SHKI1: LD 

16 CALL 

17 LD 

18 CALL 

19 CALL 

20 JR 

21 LD 

22 OR 

23 JR 

24 LD 

25 

26 SHKI2: LD 

27 CALL 

28 LD 

29 CALL 

30 CALL 

31 JR 

32 LD 

33 OR 

34 JR 

35 CP 

36 JR 

37 LD 

38 


A.0CH 
#PRINT 

DE.GETY 

• MSX 

DE.KEYBLF 

• GETL 
CONV 
N7..SHKI1 
A, L 

H 

Z, SHKI2 
(YEAR),HL 

DE.GETM 

#MSX 

DE,KEYBUF 

#CETL 

CONV 

NZ1SHKI2 

A, L 

A 

Z1URUCHK 
12*1 

NC.SHKI2 
(MONTH),A 


Year 


Month 


UXM 2 H0BiSt£icfc£T5 


8039 

8039 

8039 

8039 2A EC 81 
803C 3E 04 
803E CD 9C 81 

8041 B7 

8042 20 10 
8044 3K 19 
8046 CD 9C 81 

8049 B7 
804A 20 0C 
804C 3E 04 
804E CD 9C 81 

8051 B7 

8052 28 04 
8054 

8054 3E 1C 
8056 18 02 
8058 

8058 3E ID 
805A 32 49 81 

8050 


39 ’, 2D'V ) -vXW *if47.l 

40 ; 

41 URUCHK: 


HL,(YEAR) 
A,4 
D1VQ 
A 

NZ1HEINEN 
A,25 
D1VQ 
A 

NZ.URUU 
A,4 
DIVQ 


56 HEINEN: LD 


A ,28 
FEBSET 


A=HL%4 


A=|HL/4)%25 
(=HL%100) 


A=((HL/4)/25>%4 

(=HL%400) 


98 Oh! MZ 1987.8. 


oT'Jfox § it*> ^45fi-c'o *■ £ 5 ^ i, ox&-tm 

tfHEINENt:?!lli'LX##©&)I4’JTi.' i t» £ ftX'l) U»7XT 
tta. &C47, 48frX'ft©YEAR4-4©ffi4 , S‘ tt:25Xfl| •) i to 
49, 50ftX&>)©ti'yt4rL, * ? 0X7«ami£W#©*!!dt 

-mixLit. : nx' 2 ) b »jxt. *mt:5i~54tj-r'3)©s^si 

4-Li to jS)flXt*’*>j&oX*X< tfSi'o 

§ X HE1NEN tURUUX't * f , £ £ XliAC i ftt'fi©#© 2 
BOB^-fc-y b LX, 5tt]#-ot-PRM0NI*](:*SJJ©BSct 
-7>4’#!‘&;iXi'it. JU±t'2 H0BScfc#&SJM!li& 
7 X't. 

* i awsaH^mtiits 

y x h 4 lit,' i i'i t f n ^7^0;< 4 >r"4 -y S'a. 

©S*§X't. 7p AOttWfrtttrfliM: b 5 -* r 1 0 
H ? j ti'7 L Zhtem.fr rULTfai't < L'51'o 
iikbJir- 

(m-1) + [m# i X©P8#® ElSc] + [n-1H i X© B ft] +1 
O r (m-l) + [m^it'©K^0IIIS:]j4fft»:L it. it, 65 tt 
X'YEAR4 , flX0diLit„ £ti* f mi:ffiStStttXtia. 66fir 
Xtm-a)4’ft#LX*S'tt:fS:#lXto§s it. <kC., mt-iX 
©H#©ElSc4rft3i: lit. 68~70btf(m-l) 4-4 ktW- L X X 

* -y^-M*#. 71~73]f-r'(m-l)4-1004-ft#LXX^ -y 

74 , 75frX(m-l) 4-400 fcfMf Lit. ::X, 100#400X'tfl 2> 
®i:li 2 FJOHtScfcjRsb 5 t & t IS] ti'it. 

76fr©H#£XHL(:li(m-l) 4-400* ? A'>Xt.'i tia. £ £X'x 

* •y^i:®#lX£SS4 , mDdil&* f £>, 76~82fi-X' r (m-l) 

+ [m#iX©K#©ElS:]j fcftm it. itoXAX < 

85~87frlt5l<*/>:Sc4- 7X11-5 /_'£') m- 1 #-12 

E31B®«0 4-7£*Xi.'S t w hX'XJ[n-\R iX©B8c] + lj 
iX'XftXt-mW-lX b <U'©Xt*\ lL4ffl'»«IPH4i; 
|t < t fctfcXCi 5 C L i Lfc. 88 ]tX'iti- 1 #12E31B ©PI 
0 fr x 9 -y t Cf$# l X ^, i f It Cb l fju#X't. 

t L, CCDT^a'y x-'A^ffluti: r [n-l^iX'cD0Sc] + lj 

i XStW- L X A* k 7 X'fl] SL tuts t, fleAX'52745#©13 © 

nu's^-i-cfuz itfmtxrto tzt* l, crut 1 e©^ 
^-©Jt&X', 12HCDt 52476#iXl*’ML6 - t 

* f X^itA. r (m-l) + [m#iX©H#©llSc]j *** A'l$ 
*X 7 XfU-o X'PSCtLiD, fSsTKt S © AM»JE © t w- > $C— 


U X b 4 1 0©Btia4rifcSt5 


805D 




62 

; \-+ 

> ar»t* 

■=) •ti t4XK 


8051) 




63 

; 




805D 




64 

CALCDAY 




8051) 

2A 

EC 

81 

65 


LD 

HL,(YEAR) 


8060 

8061 

21) 

E5 



66 

67 


DEC 

PUSH 

HL 

HL 

; HL=YEAK-1 (=Y0) 

8062 

3E 

04 


68 


LD 

A,4 


8064 

CD 

9C 

81 

6!) 


CALL 

Divg 

; HL=Y0/4 (=Y1) 

8067 

E5 


70 


PUSH 

HL 

8068 

3E 

19 


71 


LD 

A,25 


806A 

CD 

9C 

81 

72 


CALL 

DIVQ 

; HL=Y0/100 (=Y2) 

8061) 

K5 

73 


PUSH 

HL 

806E 

8070 

3K 

CD 

04 

9C 

81 

74 

75 


LD 

CALL 

A,4 

DIVQ 

; HL=Y0/400 (=Y3) 

8073 

D1 



76 


POP 

DE 


8074 

B7 



77 


OK 

A 

; HL=Y3-Y2 

8075 

ED 

52 


78 


SBC 

HL, DE 

8077 

D1 



79 


POP 

DE 

; HL=Y3-Y2+Y1 

8078 

19 



80 


ADD 

HL.DE 

8079 

D1 



81 


POP 

DE 


807 A 

19 



82 


ADD 

HL, DE 

; HL=Y3-Y2+Y1+Y0 

807B 




83 


; 



80711 

3E 

07 


84 


LD 

A,7 


8071) 

CD 

9C 

81 

85 


CALL 

DIVQ 


8080 

6F 



86 


LD 

L, A 


8081 

26 

00 


87 


LD 

11,0 

; HL=t*v#W 12D* v 31-4 

8083 

E5 



88 


PUSH 

HL 

8084 




89 




; table f •t>b , 7 adi 

8084 

21 

48 

81 

90 


LD 

H1., DAYS 

8087 

1 1 

00 

00 

91 


LD 

DE, 0 

; Aec 

808A 

3A 

F.K 

81 

92 


LD 

A, (MONTH) 

; loop counter 

808D 

3D 



93 

CLCDY1: 

DEC 

A 

; loop end 

80BK 

28 

09 


94 


JH 

Z,CLCDY2 

8090 

4E 



95 


LD 

C,(HL) 

; BC=X4 l ~vX*) 

8091 

06 

00 


96 


LD 

B, 0 

8093 

23 



97 


INC 

HL 

; HL=3*7f 

8094 

EB 



98 


EX 

DE, HL 

809 5 

09 



99 


ADD 

HL, BC 

; HL=pointer 

8096 

EB 



100 


EX 

DE, HL 

8097 

1 H 

F4 


101 


JR 

CLCDY1 


8099 




102 




; HL=t* >*>y 12D* x 31-- 

8099 

El 



103 

CLCDY2: 

POP 

HL 

809 A 

19 



104 


ADD 

HL.DE 


8091) 

23 



105 


INC 

HL 


809C 

3E 

07 


106 


LD 

A, 7 


809E 

CD 

9C 

81 

107 


CALL 

DIVQ 


80A 1 

6F 



108 


LD 

L, A 


80A2 

26 

00 


109 


LD 

H, 0 

; HL= 1—f J B'tt’ 

80A4 

E5 



1 10 


PUSH 

HL 

80A5 




111 





'J* 

h ! 

5 

* 

is>? 

-©* 





80A5 




112 ; 

#P>>*-a f't'y 



80A5 




113 ; 




80A5 

3E 

0C 


114 

LD 

A.0CH 


80A7 

CD 

F4 

IF 

115 

CALL 

♦PRINT 


80AA 

2A 

EC 

81 

1 16 

LD 

HL,(YEAR) 


80AD 

CD 

E9 

80 

117 

CALL 

PRYEAR 


80BO 

11 

C5 

81 

118 

LD 

DE.MKS 


80B3 

CD 

E5 

IF 

1 19 

CALL 

#MSX 


80B6 




120 

; 



80B6 

El 



121 

POP 

HL 

; HL=t>***> vXi/"> 

80B7 

3A 

EE 

81 

122 

LD 

A,(MONTH) 


80BA 

CD 

FF 

80 

123 

CALL 

PRMON 


80BI) 




124 

; 



80BD 

1 1 

D2 

81 

125 

LD 

DE.KEYIN 


80C0 

CD 

E5 

IF 

126 

CALL 

♦ MSX 


80C3 

CD 

21 

20 

127 

CALL 

♦FLGET 


80C6 

FE 

0D 


128 

CP 

0DH 

; CR 

80C8 

CA 

00 

80 

129 

JP 

Z, SHOEI 


80CB 

C9 



130 

RET 




tfA. i Zhi) { 16t"'y b©aL#X^tffit>tlSHLw^X^li, 
li fl © 0 Sc r - tV 4-tit © t: L X t,> 5 ©Xt. i £ X 

%M<DM&lzmW L t: r EX DE, HLj L <■' ? 5 £ i C L 


X* A -5 152745#i XS#X£ 4i7i:4o]L*bItXt. 

$ (, la, (m-l)4’F©i i[!D#©EIScti,£.$ t(m — 1) mod 7 
4>l«#©E]S:i:J£t i ? i:ti t, ffi® 65535 #©t uytr- b 
£ t#Xi> c: Xc y i to £ c: 

fBfljLCb*' 6 ft < tXLti:, (m-1) mod 7 ©li ? ft fin- i 
t AX L 72. 5tfL X frX < 77$ i'„ 

?AC, [n-l^iX©0Sc]4’^i*it. ;tu:li5tfl]l5ot: P 
RMONrt©73® 0Scx-7'>4-t'lff]L i t. HH:;®r-7> 
®M7Kvx4-tybta, (HL) Cli 1 H© BSc#AoX 
I'it# r INC HLj4’1^fi-tS i (HL) li2fl©HSi:4' >) i 

to 2©P7X'n-l|l]i^yJEtlfl,t:i'#©lH**f»n-lH iX 


i Lit r EX DE.HLj liHL t DE®l*1^4 > 5:^t 5 AX' L A 

ia„ Xt*-f> 


LD DE, 0 ; DECgiLfcAftS 2 t Ct S 

LOOPILD C, (HL) ; i'i HLfi r — 7V4tn L X <.'£ 
LD B, 0 ; BCCH® 0&4’JlsCOtf.t 

INC HL ; HL&<k<Dnc.!&eb& 

EX DE, HL ; DE t HL4’3$]£ 

ADD HL, BC ; DID tf. L 72 0 Sc^S, Liit 
EX DE, HL ; Hcb'HLIir—7VHftt 
JR LOOP 

11' 7 <'*C't:EX^-#4f 7 i < ffi-o X, * S t S liHLIir—7' 


cD4A^tLCDH©0Sc4SK')a , .tz t* s X^ i tia„ i 72, JRO 
mtttfu 4 ©fit 4’#. Ifrtoit X I' Hli'[n-1H i X© 0 $c]4i# 
s - t#X£ i to 

::Xis©i s r aL^6t5j ti'7^*x'to l H*■ iLii 
fliXCHftli334BX', 2. XUiAt: Aix2> 2. t * ! 'X'|i s¥fc|jH4-1 
—y<—LXi'it. t7cs 116tX-y b©S.LSC4'lT7 L*-* 6 i 


^4”igL, Aba li 0Sc©-o-ft4’A<x2> J; 7 t:4?J 6]«siXf 5 
2 1 1 : i 0 »*fct S 2 t c L i t„ 

’J x b4’£X < 72 '?C'o i t9OJtX HL#H©0Sct-7>© 
5taI4’tlti 7 C L, 91JtX)$, L-R-htTi^L 4 1 Ati4DE4’0i: 
tyfflit Lit. «Si'X92ttX'AU MONTH, oi *) H 4*ifX *7 # L, 
ftWP^Xto A4 a- 7°t t cfslli' i t.93~101]f* ? H© 


I -2-3 


0&4S.l£->bt4 
Jv—y°-Cto 93, 94 
frfAS? i Ml:', a 

—y°fcj Afc 7 a 4 
flirL i t„ til 
1=1© 3/ uyjt"— 4fg 
^t 4 © 4- £. 4 4 f 
31 -otiH' 9 £ t a >?> 
A-tfc IttElli 
t (4&7t4>bUfto 95~101lTli5tli fcJMllAHL fc DE 4 
0 x < i) M L 4 A c> © 0 &<D&mtM-Cto 

4 7 Lt^-f4&-7t4 fcl03fr!4£ ito i-iDECIiSlTR 
t4^f© 1 EA(,*jjU! KOH&^AoTi'ito iA, X* 
X t<:!t#fit4BiJ#012J!310©Bl0A1S#Lt* 9 itAii, 
103, lO4lTf4©2o4£l£ : b-t>- r (m-l)+[rA £ Fit0|lig ; t© 
®&] + [n-lJ? t'CQB&hi'CVifW.tffcJ-C'to ZtUl 105 

ft'C'i&s.i, io6, i07ffr7ir«ofcfc!>**»!>ii-„ 4®£ 
94108, 109frtHL(4-bx l-tftlt, HLCliig^l Ai'U Affi 
WHA£>$6i oto 4©AA5Ri 9 ito 

Z tilTftflftitzPRMONZfytflbtHMl&t'trtET L £ L 
tzo z<d£ £ 4Auti> t i-©ftA, t'7t4Giu*i 
■ci' 4 * w y#- © 4 © a t1- 7 hmr t> Hffi c tu 

t4 fc1: l £ L i 5. 4 4tHL4ll0*Tff£#Ltfc§i it„ 

• * l > t—4 t i> 

^Ut'OJ: 7 At yy**-4S^t4 0Ali9 x h 54JL4 
i U 5. 

i®ifii(:liA;f]$ftA®ft UA?Sxf i-itAG, 114, 115ft 
filj®4 X 9 7 L ito <Ai:ll6, 117fi~rS^t 6 WS4YEAR 
A ifcJR 9 HI L, PRYEAR t A 7 -ftV-t y 4»f tftfi L TiSiffiC 
10lt&fiU7l £ t.PRYEARAfc® £ 7 UftoTi’SOi'tti 
4* fctfcISl till?. 10i£*?SLA®Jffi4|*i' 7,118,119 
fit" r: t©t yyf—j fcgfcjRL ito c ivc'jBH©ft±®t-li 
r OOt©tyyX-j tK^$nA6llft„ 

::f, x* xtcffcffltfci'A l 0©HI0 4HL — ift9.'l', 
L, SfcTct 4 3 4 A CSX 9 tf, l YPRMON 4»f Cfc'lU Lit (121 — 
123tf)o k 7, PRMONliHLC 1 0©W0, AAftiRt 4 J3 4A 
ftffif'ffitAtLAfco 

t y y t"—^ tRA^L. 4 t 125~127lf f r HIT <CR> to contin 
uej fc tzTF L , #FLGETA-ty41£xtt-/A£« 1 X^A 
fj4lTi- ito 4 lUltEiJ©^] © t yyX*—4HA i' fc®xA t & 

uiK^-uas 4 t At* 4 t ? t: t1' 7 len-rto #flget a 

—f-yA C> li ACff $ tltz^f— (07 X if — 3— K4 At-t'lfo f 
Hto *ct'i28fr'c'ff$nA’©* ? vx-y*- a*xA©a fc 
7 A fc1' 7 491^4 It i', ff$ ftA©A 9 & — > A—A' x A© 4 & 
129lft'x 0 P tx ACDftslAilAtBtf®® fc R!©A9l4lTi'i to 
9 * - y t —f 4 Ax A^lil30frf tn t'x a (i^Ttto 

9 x h 6 A®@4l0lI$cf^Rt4t:/A-f-yPRYEAR t 
to x fc^fc>xAtf 9 A’4 11£> 9 it 

©■r, *;j4>#©:4i: lilt L i-A i> L ft i t A 0 MA-mtf LCH 

-o t {) (lx 4 7 ft o 

cni-r'MJt*-Kst9±ifAioji^^-t> t it mi © *• ^ 


19 m,) m- 

8) Sun Mon Tue Wed Thu Fri Sat 

2 3 4 5 6 7 8 

9 10 11 12 13 14 15 

16 17 18 19 20 21 22 

23 24 25 26 27 28 29 

30 31 


HIT <CR> to continue 


LTi' 4©cfcfvM'i‘-f'L x 7 *‘o z<n£r'cDiomm^^- 
t>lii*i®i:7-t??i#-o-C4»'9, slt:#<^S4 0 ^:®v- 
7 4P-S4C: t Ci oT|| L T i' i LAo 4i:i 9fc'*-Li'© 
(il78ffC*4 r CALL PR YEAR j 11' 5 Stg#t 

«fO t aiL-Ci*4©-C'to I'xAi'f 7 LA: ttU 5o 
. Loli PRYEAR liWf (9 ii-U^n-w) 11' 7 
C/d/9 a LT*4©ft„ LISP, C, PASCAL 4 £ ft -x * * 
9 W^4W§7°ot"x Aft* 5 ', -7# L'C’4i'^' t (.toUS 
YU^t WClPU L-Ci.’§iL±7„ 
W»tli^S& J PM»* ? g^g#©rtS|5 t'W if G t S # 4 nf- c/ 

tht 4 t 4 l' l' i to A t t It 0 *■ c> n i -r©£-ft44 \m 
SUM4#x-CAi Lit SUM(n) li<A© i 7 i:t«5Ait. 

1) {> L n**0 0 

2) £ 7 CT'4 IlfUi'^x liSUM(n-l) Cn4SPL A t © 

A t i If0*» ?>3 i 'C'<D&ti\£ z ©Si§A J: 4 fc, Ot c> 2 i f©^ 
ftC 3 4IJP x A t ©A" fc i' 5 4 11:4 9 i to 
m*'i- kCD fc fa 9 All f, ? A4tMf* , -C'|i 4 ©At. 5 

*■ t i'7iF»1W6 < fcJBi'i to #)fftW©-C'^ 4mMlii 

< ft-Ci'-C, ;A©i 5 i:fi?'(AL i t„ f?iJt LTSUM(3)4- 
f^CftiU t SUM (3) lilA© £ 7 i:Ii?nito 
SUM (3) = SUM (2) +3 

4 4 -r'SUM (2) it i Am* f 3R ixti'i-a-Ao k z-c 
SUM (2) = SUM(1) +2 

fc L-CSUM(2)43R*i:i'| ito fc 4 tASUM(l) b £ A*i 
x f i' i 14.0 

SUM(l) = SUM(0) +1 

SUM(0)li£flLt:A 9, ^xliO-T'tfao ft* 1 ?. 

SUM(l) =0 + 1 

t 4o7SUM(l)* f 3Ri 9 ito SUM (1) A7Rit.lt 
SUM (2) =1+2 
t4xtSUM(2) LtR i 9, 

SUM (3) =3 + 3 

fSUM(3)©^x43R*4 4 fc At'ii 4©f"t„ 

LISP4 fc'W»®ttl 4 4 >*7°9 4?tr'li4©i 7 4tiAt(jE 
ft U It 4 © t fc 9 fit 4 1 ') tmUrillK) i to fltC^ PASCAL 
4 fc' © = x S3S®f li fc 5 L f i' 4 ©A t a a i 11, 

Ctlixy^'M x©fts#Afc©t 5 i:«taLJ: 7 t#x4*>(4j; 
xfltxf < 4 ©ft A', -fefl^i:ltl-W®t©?l*!c4xX x/±i: 
®14 4 fc 14 X 9^*lLf I'ito if l a 4 11**0 5 %&#>!:? 
4 4 fc 14 Lf, fc'0i7 I4#jf7°n tx ^ 4FR4 *• fcid TFldt 

ii*ti' l> i L X 7o 

Htf L i 7 t 4 At b 41'B# 4 ©ft A, ^%IJ© 7 fc. It fc 

7 14^91 l a ifc i'i'©A tiiatj-14 A-rto => % yn 

oxi-6 mme>mm 


80E9 

80E9 

80E9 

80E9 

80E9 

80E9 3E 0A 
80EB CD 9C 81 
80EE 47 
80EF 7D 
80F0 B4 
80F1 7B 
80F2 28 05 
80F4 
80F4 F5 
80F5 CD E9 80 
80F8 FI 
80F9 C6 30 
80FB CD F4 IF 
80FE C9 
80FF 


164 ; Prin 

165 ; 

166 ; in 

167 ; 

168 PHYEAR: 

169 

170 

171 

172 

173 

174 

175 

176 

177 

178 

179 

180 PRYR1: 

181 
182 
183 


Out Year 
: HL = YEAR 


LD A, 10 

CALL DIVQ 

LD B, A 

LD A, L 

OR H 

LD A, B 

JR Z.PRYR1 

PUSH AF 

CALL PRYEAR 

POP AF 

ADD A, 1 0 1 

CALL #PRINT 

RET 


3 9X l\ 0 ? 

T79 9 *V*> 


100 Oh! MZ 1987.8. 






tJBi'atfjc t-r 

to SJfffcgJRt 4|!92&pryear4X68000©X-BASICtli : C'-C^ 

i ut 

func pryear(year) 
if year/10 = 0 then I 

print chr$(&H30+(year mod 10)) ; 

I else I 
pryear(year/10) 

print chr$(&H30+(year mod 10)) ; 

I 

endfunc 

4 4 tpryeariStf:© S 7 C^ftS tiT oit, 

1) i> Lyear^10fSH-o k .(>, 

Sff<t 6 

2) Z 71<o, year-MO^pryeartT'j^TKt?-d"C, £ ©f& 
A C year £■ lOlT’WlJ -o 4 £ 0 4 StR t 3 

ffii LtliLi'Cl^-rto 4 t jLIJTl2344fS^S-«-J: 7 it 4 
4 i? |Jf, pryearC X -o X 1234f§7R? 4?, £ ©f&A (I44i£;?xt ft 
ISVi' ti'5 w t 4©"Ct 0 pryear4 <■' S TeISI Lfi'JCl) *'*• 

LtfJffltS. :n 

t4'©tto 

i>« t i> z £3£* f l*-i7o4 

t'*>tt-cA-c. t®j< 4 t 4#:4i*4iffti£Vtts-a-A„ 

pryear(123) 4jf5i'4lf "C A-£ t t, 

1) pryear(123) 

2) =;> pryear( 12) : .print “3” 

3) =tpryear(l) : print “2”:: print “3” 


4) sprint “1”;: print “2” ;: print “3” 
t 4 0 1 t *• C>, »*• Up® C IS 123 fc ft 4 4 fc 

§ £ 14„ 

"C ISpryear©^ :> >lp)tk4M, 4 2 11- L i ll 7oPRYEAR"f 
ISHLC^L4i.'Sc4-t-7 h L X *• liWffit 4 fcftli L4» 

£ 1109, 1701J-THL410-T'fl] 0 , 1711?f & 0 4 B Cf$# L T if 
I i to 172, 1731?-Till 0 #(7)iSiHL*' ; 0 *■ n *»4ii-s, B t:f* 
#L-C*fi'fc^Mrl74fft'Ai:RLtteS £t 0 £ Lt, iS?** 0 
«r«wt 4 4«0t:i80lrMPU£L 11 (175??)„ 
i(fi* f o -T4 *• o4*§£-i:IS 177 1?i:Ht. ::t"&9 4 x * 7 
X <:(£# LtfePt, 10T'Sl|o4flg«M#o -C#tf PRYEAR 4I 1 ?- 

c/mtco-rt. 

PRYEAR-C'HL-H104a!jJR3t4* t IS 179l?-rto fWLT 
4oU'4#to 4 jr o di l, i8otrc'&ffi4*c : f t:fi:i -ri82i?-t?47K 
tnis'^Tfto 

4cos 7 C, 4 7 tt4J§&t>#;L?j 

IS m Et'to PRYEAR^f l> 1l'4 {, © t L X 7 °n t' v u t ftt£ 
I'PWYt. 44L, O toSritM^olf 4imiJT4 f.4t'4 t 
0 it. h fUS-? ^ >ifi:lS3lft(> 4t' 11' 

177, 179frC*fc 1 4«#L 4 ltniS'4 t> 4 1 'COIS 4 
©4»tt o ?f>4t't, #)§14 t l©fi|9@:i:£oTA* i 'f$ 

jntli i\ s 4 t & (:&<> 4S7RIT^4 4 

t * ? -r & 4 < 4 O X L i I - i t o turboBASIC t'#)S 414 © fc 
|m] C S 7 4 t ©4't # X. ftlSV t-f Lit 

isr »*') z>4mrs&ti 4/ra<-r'to 

ttl, x £ 7 ^ 4 7 1 'it;i: ii'iWL, ^IrlSM< 4t' t <■' 7 ^4 t 
x©i(ii U? bltfttt i' £ to *■ 11' 


xs^igigigigiigEBaiiil]) 


# FLGET : 


T*)\ l631l«[^X*r*<7>JWifflTL3&'fc*U X 

1) £To i*ut -LCfT < tzZ 

t' 0 =sm tk^- 


+ + l'1986^ I 

tf^nTl'^To Wr«1?l^>i^BI0S^I0CS^*#^itT, * —VJUMi 
I MtA Kizhi b\ lttztt: x )T)\*9 4 A + - 

A Mzbit\ + 

To XIT(Jx> + -(7);i#ia-§^, MZ-2000T'{i'>A b* — «r^fL4'^ 
«b 0 ~ 6<7) + --§rff-t±(i'A ~ Ft't'A^'C# ^ «t ^:4'oTl'Jt 0 C<7) 

i *mmzm7Ltz&mifi, 

4-^i6ii+-cT?>^>i^rzTtiraLi ln a 
x> + -^rl 6 ii + -(ZT ; 5C(J, # FLGET T 'fttzTX* — ^— 
I!e?f:'5/:^ni:^r^A~F07X + -a- KU^LT^tUf 
I'l'^ItTTo #FLGET^«b!§oT^/ c ib 

cp 7' 

LD A,’A' 

£ ^ T # FLGET tl cJ: oTHUasnfc Tl/z + -(7)T * *-=l - 

Kj AttWdti, 

1) r #FLGET 
EQU 2021 Hj fcl^Tr&fllJI&T* 

2) !UT(Cjr:T#FLGET^7 ,, P^7A<7)S^C'(t(tiPX.^ 

C^t'tc L ^To frLi'#FLGET(i^(7)J: 9 4>yp atT„ 
FLGET EQU 2021H 


FOUT : 
FOUT1: 


CALL FLGET 

PUSH BC 

; * — 7/k£$ 1 ^AtJ<7)n^CTtjbL 
; B**T<7)T»#LTfc< 

LD B, ’A’ 

CP 7* 

JR Z. FOUT 

B(i ’A’ (7)7 7 + —P- K 

AtJ ? n/z<7)(i 7’ /)' 

^94«b^T 

INC B 

CP ’* p 

JR Z, FOUT 

B tJ 'B’(7)77 + -P- K 

A t}$tltz<7)tt’*’fr 
*nUb$kl 

(’C'-’E’OT®!) 

INC B 

CP 

JR NZ, F0UT1 

B It 'F' <7) 7 7 + — P — K 

Atj£ ntc(7)tt ’. ’ t)' 

^9 T'^ttnti'FOUTl- 

LD A, B 

POP BC ; 

; ^T^)77t-P- K^rA^Ati^ 

; «#LTfcl'fcB*«lUHJT 


RET 


Z 9 ltz&l:XT-\z>7')[sLUtiitti, 7°P ^*7 A(7)ffe(7)g|5^(Z^^ip 
^4' < «5mci6ii^c7)^-se5iJCTSC £A<T# ^T 0 C(7)^ 
>*(7) a ^ - <r> mmtt tz tt Tit >&:<><>+-<7))H3«a^ ^ w 

ITU-F C^^tlT LHZt TT vv >»A**y-^ J: 
l4't<7)4'bf«'L'T'Lj:‘?o t Xtt)\ 1?FLGET^^oT 

itc, > + -(7)—+ 

-CLTin Ztti'XZ STo X >^r-07~9^4*'LTt(7)| ) /: 

i) IZ7 £ < + t 9o gt><7M£ 

l'^Tl'«i: 9 C + F^7U>yT'^ £ £ l '9 T'T 0 

§fttcfA(7)V'>>|gAt3>i ; &-ilS^LTt5# IU 1 
+ -. + 0~94«b*¥T, A~F4«b^¥T' 

A^LTlTTo Cl' 0 (t^i'T'T«Lo 


vv>i§^|.2*3 101 












X ?„ A:/', ^- 7 °k\ii^X 
?> t>©iit^TW§-t'* : < c t* s r & **\ wt-r*< c t 
©trii s tcDo+uii/*'—tco* f *2. £ ?r-fo 
fr S /l (i £ *> ^ t'tsVifrX' Ln„ fi/Tt* 1 ? fidiWfctttf § 

xw-rt. 

l/AM !kFl<W7'Jl--?>t 7 -yfe-^x —* 


Z80 • @1 1) W.m:sbmm* 

0 - 65535 11' i -ci' zm.m*muztk%tm 
i-r. cr»|flp<*f3i' 0 


80FF 
8 OFF 
8 OFF 
8 OFF 
80FF 
8 OFF 
B0FF 
80FF 
80FF 05 
8100 

8100 F5 

8101 CD 7E 81 
8104 3K 29 
8106 CD F4 IP 

8109 FI 
H10A 

810A 11 54 81 
8101) CD K5 IF 

8110 

8110 F.5 

8111 21 48 81 

8114 3D 

8115 5F 

8116 16 00 

8118 19 

8119 4E 
811A El 
8111) 

81 IB 41 
81 1C 0C 
81 ID 7D 
81 IE B4 
81 IF E5 

8120 28 14 
8122 

8122 11 73 81 
8125 CD E5 IF 

8128 2D 

8129 20 FA 
812B El 
812C 

812C E5 
8 I 2D 3E 07 
812F CD 9C 81 

8132 B7 

8133 CC 41 81 

8136 79 

8137 90 

8138 CD 78 81 
813B El 

813C 23 
813D 10 ED 
813F 

8L3JLB1 - - 

8140 C9 

8141 
8141 

8141 11 72 81 
8144 CD B5 IF 

8147 C9 

8148 

8148 IF 1C IF IE 
814C IF IE IF IF 
8150 IE IF IE IF 
8154 

8154 20 20 53 75 
8158 6E 20 4D 6F 
815C 6E 20 54 75 
8160 65 20 57 65 
8164 64 20 54 68 
8168 75 20 46 72 
816C 69 20 53 61 

8170 74 

8171 0D 

8172 0D 

8173 20 20 20 20 

8177 00 

8178 
8178 


184 

185 

186 
187 


PRINT MONTH 


A = Month to be printed 
HL = First Day ( 0,1,2,..) 


brkn : AF.BC.HL 


191 PRMON: 

192 PUSH DE 

193 

194 PUSH AF 

195 CALL PRTDT1 

196 LD A,’)’ 

197 CALL # PRINT 

198 POP AF 


199 ; 

200 l,D 

201 CALL 

202 

203 PUSH 

204 l.D 

205 DEC 

206 LD 

207 LD 

208 ADD 

209 LD 

210 POP 

211 ; 

212 LD 

213 INC 

214 LD 

215 OR 

216 PUSH 

217 JR 

218 

219 LD 

220 PRMON0: CALL 

221 DEC 

222 JR 

223 POP 

224 ; 

225 PRMON1: PUSH 

226 LD 

227 CALL 

228 OR 

229 CALL 

230 PRMON2: LD 

231 SUB 

232 CALL 

233 POP 

234 INC 

235 DJNZ 

236 ; 

237__POP 

238 RET 

239 ; 

240 CRTAB: 

241 LD 

242 CALL 

243 RET 

244 ; 

245 DAYS: DEFB 

246 DEFB 

247 DEFB 

248 ; 

249 WEEK: DFFM 


DE,WEEK 
#MSX 

HL 

HL,DAYS ; Top of Table 

A ; 0=10*9, 1=2** 9, ... 

E, A 

D,0 1 DE=Month 

HL, DE 

C,(HL) 1 C=Days of the Month 

HL 

B.C 

C 

A, L 
H 

HL 

7., PRMON2 

DB.TAB1 I *’4 l’-'*'*' 

imsx ; av-x » v.» 

L 

N7..PRMON0 

HL 

HL 
A,7 
DIVQ 
A 

Z,CRTAB 
A, C 
I) 

PRTDT I Display the DATE 

11L 
HL 

PRMON1 


; print CR and TAB 

DE.TAB 

IMSX 


31.28.31.30 

31.30.31.31 

30.31.30.31 

" Sun Mon Tue Wed Thu Fri Sat" 


250 DEFB 

251 TAB: DEFB 

252 TAB1: DEFM 

253 DEFB 

254 


255 ; PRINT DATE 



H I 78 
8178 
8178 
8178 
8178 
8178 

8178 CD FI IF 
817B CD FI IF 
817E E5 
817F 6F 
8180 26 00 
8182 38 OA 
8184 CD 9C 81 

8187 K5 

8188 7D 

8189 C6 30 
8 I8B FK 30 
8I8D 20 02 
818F 3F. 20 

R19 I CD F4 IF 

8194 FI 

8195 C6 30 
8197 CD F4 IF 
8I9A El 

81911 C9 

819C 

8I9C 

8 19C 

819C 

8I9C 

819C 

819C 

8190 
8I9C 
819C 

8 19C C5 
819D 4F 
8I9E AF 
8I9F 

819F 06 10 
8 IA1 29 
81A2 8K 
81A3 B9 
81A4 38 02 
81A6 91 
8IA7 23 
8IA8 10 FT 
8 IAA 
81AA Cl 
81 Ail 09 
81 AO 
81 AC 
8 I AC 

81AC 49 6K 70 75 
81110 74 20 59 65 
81114 61 72 
81116 01) 00 
81B8 19 6E 70 75 
81 BO 74 20 4D 6F 
8100 6E 74 68 
8103 01) .00 
81C5 08 DD 09 20 
8109 B6 DA I)D CO 
81CD DE 2D 
81 OF 01) OD 00 
81D2 0D OD OD 
8 11)5 18 49 5 1 20 
H1D9 30 43 52 3K 
81DD 20 74 6F 20 
81H 63 6K 6E 74 
81K5 69 6K 75 65 
81E9 20 20 
81KB 00 
8 1 EC 
8 1 EO 

81EO 01 00 
BIKE 01 
8IEF 

HIKE 00 00 00 00 


256 

257 

258 

259 

260 
261 
262 

263 

264 

265 

266 

267 

268 

269 

270 

271 

272 

273 

274 

275 

276 

277 

278 

279 

280 
281 
282 

283 

284 

285 

286 

287 

288 

289 

290 

291 

292 

293 

294 

295 

296 

297 

298 

299 

300 

301 

302 

303 

304 

305 

306 

307 

308 

309 


DATE to be printed 


CALL 

CALL 

PUSH 


JK 


LD 

PRTDT2: CALL 
POP 
ADI) 
CALL 
POP 
RET 


QUOTIENT ROUTINE 


IPRNTS 

•PRNTS 


L, A 

11,0 


A, L 
A. ’0* 

’O’ 

NX., PRTDT2 
A, ’ ’ 

IPRI NT 


; HL = DATE 


; DATE/10 
; 1 > ’i save 


; 1 QJ 9H t\ 0 ? 


I ) 7 get 


DIVQ: 


PUSH 

LD 

XOR 


SUB 

INC 

DJNZ 


; Messages 
GETY: DEEM 


B, 16 
HL, HL 
A, A 

C 

C. DIVQ2 
C 

HL 

DIVQ1 

BC 

"Input Year" 


Copy Divisor 


Loop Counter 
Shift Left HL 
Shift Left A with CY 


Set ANS bit 


01)11,0 

"Input Month" 


"*W *P>»*-“ 


314 

315 KEYIN: 

316 


DEFB 01)11,01)11,0 

DEFB 0DH , ODH , ODII 

DEFM "HIT <CR> to oontii 


317 DEFB 0 

318 ; Works 

319 ; 

320 YEAR: DEFW 1 

321 MONTH: DEFB 1 

322 ; 

323 KEYBUF: DEES 256 


UXM * b 


8000 

3E 

0C 

CD 

F4 

IF 

11 

AC 

81 

68 

8008 

CD 

E5 

IF 

11 

EF 

81 

CD 

D3 

F2 

8010 

IF 

CD 

CC 

80 

20 

EF 

7D 

B4 

78 

8018 

28 

03 

22 

EC 

81 

11 

B8 

81 

04 

8020 

CD 

E5 

IF 

1 1 

EF 

81 

CD 

D3 

F2 

8028 

IF 

CD 

CC 

80 

20 

EF 

7 D 

B7 

7 B 

8030 

28 

07 

FE 

0D 

30 

E7 

32 

EE 

71 

8038 

81 

2 A 

EC 

81 

3E 

04 

CD 

9C 

C3 

8040 

81 

B7 

20 

10 

3E 

19 

CD 

9C 

28 

80 4 8 

81 

B7 

20 

0C 

3E 

04 

CD 

9C 

0F 

8050 

81 

B7 

28 

04 

3E 

1C 

18 

02 

1)8 

8058 

3E 

ID 

32 

49 

81 

2 A 

EC 

81 

EE 

8060 

2B 

E5 

3E 

04 

CD 

9C 

81 

E5 

21 

8068 

3E 

19 

CD 

9C 

81 

E5 

3E 

04 

68 

8070 

CD 

9C 

81 

D1 

B7 

ED 

52 

D1 

82 

8078 

19 

D1 

19 

3E 

07 

CD 

9C 

81 

32 

SUM: 

F7 

51 

EE 

A8 

73 

8B 

42 

93 CFF0 

8080 

6F 

26 

00 

E5 

21 

48 

81 

11 

: 75 

8088 

00 

00 

3 A 

EE 

81 

3D 

28 

09 

: 17 

8090 

4E 

06 

00 

23 

EB 

09 

EB 

18 

: 6E 

8098 

F4 

El 

19 

23 

3E 

07 

CD 

9C 

: BF 

80A0 

81 

6F 

26 

00 

E5 

3E 

0C 

CD 

: 12 


80A8 

F4 

IF 

2A 

EC 

81 

CD 

E9 

80 

E0 

80B0 

11 

C5 

81 

CD 

E5 

IF 

El 

3A 

43 

80B8 

EE 

81 

CD 

FF 

80 

11 

D2 

81 

IF 

80C0 

CD 

E5 

IF 

CD 

21 

20 

FE 

0D 

EA 

80C8 

CA 

00 

80 

C9 

21 

00 

00 

1A 

4E 

801)0 

13 

FE 

30 

38 

12 

FE 

3A 

30 

F3 

80D8 

0E 

29 

4D 

44 

29 

29 

09 

D6 

F9 

80E0 

30 

4 F 

06 

00 

09 

18 

E8 

B7 

45 

80E8 

C9 

3E 

0A 

CD 

9C 

81 

47 

7D 

BF 

80F0 

B4 

78 

28 

05 

F5 

CD 

E9 

80 

84 

80F8 

FI 

C6 

30 

Cl) 

F4 

IF 

C9 

D5 

65 

SUM: 

7B 

B8 

75 

82 

A1 

9C 

2B 

8C I 

3009 

8100 

F5 

CD 

7E 

81 

3E 

29 

CD 

F4 

: E9 

8108 

IF 

FI 

11 

54 

81 

CD 

E5 

IF 

: C7 

8110 

E5 

21 

48 

81 

3D 

5F 

16 

00 

: 81 

8118 

19 

4E 

El 

4 1 

0C 

7D 

B4 

E5 

: AB 

8120 

28 

14 

11 

73 

81 

CD 

E5 

IF 

: 12 

8128 

2D 

20 

FA 

El 

E5 

3E 

07 

CD 

: IF 

8130 

9C 

81 

B7 

CC 

41 

81 

79 

90 

: 6B 

8138 

CD 

78 

81 

El 

23 

10 

ED 

D1 

: 98 

8140 

C9 

11 

72 

81 

CD 

E5 

IF 

C9 

: 67 

8148 

IF 

1C 

IF 

IE 

IF 

IE 

IF 

IF 

: F3 


8150 

IE 

IF 

IE 

IF 

20 

20 

53 

75 

: 82 

8158 

6E 

20 

4D 

6F 

6E 

20 

54 

75 

: A1 

8160 

65 

20 

57 

65 

64 

20 

54 

68 

: 81 

8168 

75 

20 

46 

72 

69 

20 

53 

61 

: 8A 

8170 

74 

0D 

0D 

20 

20 

20 

20 

00 

: 0E 

8178 

CD 

FI 

IF 

CD 

FI 

IF 

E5 

6F 

: 0E 

SUM: 

5F 

04 

C0 

89 

2A 

30 

5F 

4F 

E719 

8180 

26 

00 

3E 

0A 

CD 

9C 

81 

F5 

: 4D 

8188 

7D 

C6 

30 

FE 

30 

20 

02 

3E 

: 01 

8190 

20 

CD 

F4 

IF 

FI 

C6 

30 

CD 

: B4 

8198 

F4 

IF 

El 

C9 

C5 

4 F 

AF 

06 

: 86 

81A0 

10 

29 

8F 

B9 

38 

02 

91 

23 

: 6F 

81A8 

10 

F7 

Cl 

C9 

49 

6E 

70 

75 

: 2D 

81B0 

74 

20 

59 

65 

61 

72 

0D 

00 

: 32 

81B8 

49 

6E 

70 

75 

74 

20 

4D 

6F 

: EC 

81C0 

6E 

74 

68 

0D 

00 

C8 

DD 

C9 

: C5 

8 1C8 

20 

B6 

DA 

DD 

C0 

DE 

2D 

0D 

: 65 

81D0 

0D 

00 

0D 

0D 

0D 

48 

49 

54 

: 19 

81D8 

20 

3C 

43 

52 

3E 

20 

74 

6F 

: 32 

81E0 

20 

63 

6F 

6E 

74 

69 

6E 

75 

: 20 

81E8 

65 

20 

20 

00 

01 

00 

01 

00 

: A 7 

SUM: 

D4 

49 

7D 

03 

89 

4 A 

F3 

IB 

DC58 


102 Oh! MZ 1987.8. 
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nXji(D\\m&i!!, % , 2970iir'#lijf^«|ll| 
ti>? i5C4oTi'it. 
1340~1370fi-trft?iJC0S*^ INPUT L 
i t*L HuBASICt: liCALC 11' 7 
* 6 (DX , fr*'l<7)WXeK«Sc£TNPUTt 

4*-T4 < M$(i ,1) t: cosU/6) 

111 

g 



4 t' 4INPUTL, A(1,1) =CALC(M$(1, 
D) t It ;Ji»6Ti'i to C H4"t, COS 
(tt/ 6) =0.87^f|-ac L TINPUTt S t l'o 
tt T#f; elUiPl-rto 
!I x h t J l a:tUt'il4txLTfa& it 

iffJSl g Liicb Z ift'iA! i 4, £ 4 till tit 
g 0)i h I) Claltst i L Riff=* 5 I# F> |1 i t 
*L ccoI‘lidi4tirii a-TfflotU«9J 0 
1 1 coiili»*Tffl J I, SUIbH. t 4 S c 
t * f i'< *■ f>sp nti'it o w nc>coiiti 
t "fIfftT SiLfc(M l). 
rij» \' PWMOZ i L TIT XL, 

®®©ir^ (*w) 

t **^cf#&, w l 

tttz (nmmm-)o 

Ub'O t "jeo ATTATti § n 5 J: 5 «: 4 D 

i L4„ nY^li-iXATT^, RfMi^lit 


xmznzz l ij-bi)' 1 i L 4. i 4$t:, 
•»<0ZUX'*t?^ 
ax 2 + + cy 2 + dx + ey+/ = 0 


A' 



BASICT-St!^ t *.i-. 


















zzr'li, 

Z0Z £ ? £.@.i'i t„ 

17 it 

y ©AftA 

cy 2 +(6x + c)y+tfx 2 + </x+/=0 

tti, r^es;oj#o&iC?rffli.'-c» 
S, owina-r* Lite t ft b 4, 

_ — U>x+e):t /(A.r+e) 2 —4c(ax 2 +</x+/) 

y_ 2c 

£ t Zbltfto 

Z<Di 7 X 7t‘t* s , « 

Scuffle J: o 7tf£tHl 4 L 4 tint* 4 4 
4i'©7'*>4 i)®giJ-C‘to 


c*0 CO £ & 

_ — (&rH-g)±y/D(jf) 

y 2c 

:D(x) = (^r + c) 2 -4c(^r 2 + ^r + /) 
c = 0£> t & ■* 

' b±0(Dt & 

&t 2 + flfc +/ 


&t + c 

a (-f) Vrf (-f) +/=0 ^ x= 


£ = 0 0 i % H> 

.(c*0 y= 


ax 2 +dx+f 

e 

e = 0 <DL Z =*> 


-d±Jd^ 4af 

a± 0 x =-s-— 

la 


a =OCO £ £=!> 


</=£0 x = — 


/ 


4=0 41 
. <DUi£ It/77«{ Z £ lit& i t 


* J , SC0^* ? $ i $" i fR*®* £ 
fc i < t> A ■ *) i t A 0 
£ -t, fit'li:u —iA'Sitfc4f?i;o4£ 


MX* t5 #i£4ffl<c 5:tcut„ 


zco^mii rnfZc »^0g* 4;® X. t i ’ 4 t 

* j (**sfta#, UMWfcW^).W3aw«:tt 

ftasMutat < 

Ri't:i.'54'(t4co-r;iiU' i>0tii* *> 
i ti-A 0 44*- «i:« ? 0li*X40f 
4 f#J t# itAHn. 

<(m> ci : 2x 2 +4xy—y 2 —20x — 8y+32 = 0 
2x 2 +4xy—y 2 —20x—8y+32 
= 2(x-xo) 2 + 4(x-xo)(y-yo)-(y-y») 2 + c 
tfei'f, x,y0f#,ft4Jtl5t4£, 

—4xo—4y 0 = —20 (1) 

—4xo+2y 0 = 8 (2) 

2x 0 2 +4x 0 yo — yo 2 + c = 32 (3) 

(1), (2) i 0 
Xo ■— 3, yo = 2 
(3)i:ftAlt 
c= —6 


i <>r ciii, 

2(x—3) 2 + 4(x—3)(y—2) —(y—2) 2 =6 
£ WtZZii, z it lie ! 4 x Irt^ipjt: -3, y 
tt#r&]C -2tsitwm&tz £, 

c 2 "■ 2x 2 + 4xy—y 2 = 6 (4) 

1 1 '7 rissr^ § n 4 ftn £ 4 4 z £ 4 

;A'i:c 2 4lg*0i t> 0 c -0 4ll®ls$ 
7 4[111$£4 c 3 £ L, c 2 _h 0* p(x, y) * f c 3 
±® * p\x\ y) C#o 4 £ t 4 £, 

(x'\_(cos(—8) —sin( —0)\ /x\ 

\y/ \sin(—0) cos(-0)/ \y/ 

. /x\ /cos( -0) — sin( — 8)\-'(x'\ 

”\y) \sin( — 8) cos { — 8)1 \y') 

_/cos0 —sin0Wx'\ 

Vsin 8 cos 8) \y') 

. j x = x'cosd — y'smd 
'' 1 y=x'sin# +y'cos^ 

c4i?f(4)(:ftA1"4 tc 2 li, 

2(x'cos^—y'sin0 2 +4(x'cos^—y'sin^) 
•(x'sin^+y'cos^) —(x'sin^ + y'cos^) 2 
= 6 

:n^x',y'i:cn'rsats t, 

(2cos 2 ^+4sin^cos^—sin 2 ^)x' 2 +(—4sin^ 
cos^+4cos 2 ^—4sin 2 ^ —2sin^cos^)x'y' 
+ (2sin 2 5 — 4sin^cos^—cos 2 0)y' 2 =6 
t 4 D, x'y'CDM&k OttSt, 

— 6sin0cos0+4cos 2 #—4sin 2 ^ = 0 
•'•4cos2^=3sin2^ 

•'•tan2^=-|- 

i 4 0 i to 

$r, BASIC!:« ATN(X) tiOWft 
* s * 0, tan 0tfi* f X r* 5 / f i ®fl411L 

■CS it. 

28 = ATN (4/3) = 0.92729522 5 4 7 > 
r, 8 =0.463647617 t 4 ') i t„ 

Z ©lift x' 2 0«a, y' 2 0«acftA L 

tfUJiti t, 

2cos 2 ^ + 4sin^cos^—sin 2 ^ = 3 
2sin 2 ^—4sin^costf—cos 2 tf = —2 

t 4 D I to 

c^®*®ib 11:-0.46364717 ^‘7 > 
A'llEHSS-fr* t, 
c 3 : 3x 2 —2y 2 = 6 

i:4 z> z t k7*l r c -i to :M, 

_a! _z!_ =1 

(/T) 2 (/3“) 2 

r, o*i) wiM 1 1 ' ? z t rto 

Z 0c 3 ±0 *0* 6 11:0.4636761 

7 k’7 > lulls l, £0*4 x llllT/lu)C 3, y 
tlliTjftt: 2 4"(ttfr#i* L 4*!i7£0|lll® 
c.±t:£> S iitrtoZ01 ? t:L7,4i 
c> 4t4tSI^4JSi { : t * ? r & 4 4 !ltto 


<f?i|2> x 2 —2xy+y 2 +4y—11 = 0 

«1 tWWH:, 

x 2 —2xy+y 2 +4y—11 
= (x-x 0 ) 2 -2(x-xo)(y-y»)+(y-yo) 2 +c 
tfc< t, 

2x o A 2y 0 = 0 
+ 2x 0 —2y 0 = 4 
t 4 0 * tA„ 

—&0iI4M*t 4 z t (i-Cif * -ti-A* f , 
tn4S4J: < f.4 t, 

(x—y) 2 +4y—11=0 

t »r & 4 z t *> i to £ :r. 


t*«t4 t, 

y = ^7T 

t 4 4 0t, 

2y' 2 —2/2"(x'+y') —11 = 0 
y’—/Yx'—-fly'— y=0 

(y'- 1 ?) ,=/7( *' +3/7) 

t 4 6, < 4 =t ? cW-fifPM 

t4t, 

y” 2 = -/2"x" 

t i'5& ! ftlS4 4 ') * to 
Z0«^«, *f)i*0*;b !) tz 135°® 
Is l, O i>rtlT#l)Jt 4 t«w t: 4 D 
it. / 77 «< Cli, ity 2 =/ 2 "xt. 
0*4#i, £0*4 x|ft7rio)(: -3/3", 
y ttS'lpjC +/2"/24'tl¥lf #®lJ L, $ tc, 
C)I*0i4 D C-135"01st 4 £4*-^ 
t-7:4)i41.*:* ? ^i •) it, 

:0i 7 i:#i 4 t, 
ax 2 +24xy+6y 2 +gx+/y+c = 0 
4lulls i ¥'if min- i o r«ip», 

Ax 2 + By 2 = l 
i 414 
y 2 =Apx 

0^C'J§if$t4 Z t**rs it, 

z 44 —ft fi'j t: is o r ft o 4 7° n y 7 ^ 
* fi ; x 1 . 2 rt, ffl!c4A4t 4 £ gfl <)0 
iiiisss 0 17 7 kmmzv b 0 £ injii^cijs & 
ito ^esst:lot nmmMU'X’ 17 
iic^* ? *lti4 z t uut 
z 0 J: 7 c L r—ft0r?AffllS44B < z 
£ * f ts i tor', !/ x f l 0 -^lftt: 
=t aroo»i:{>, 

4 ) -ft0r<AillilS5 
4 ft it in 4 4 : 11: L i L4o 
$ 7 , <40ii^S:0*tffii*4*i’7 

44!' £,@7' i to 
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UXhl -&&£(;: 


1000 

INIT:WIDTH 80 


1010 

PRINT " 


1020 

PRINT " 



1030 

PRINT " 

t 

* " 

1040 

PRINT " 

* 

XI /turbo f Hu-Baaic ] *" 

1050 

PRINT " 

t 

1985/8/20 T.Yaso *" 

1060 

PRINT " 

***** 

xx*****************t*****************************" 

1070 

PAUSE 15: 

: CLS 



1080 PRINT J 9 liV." 

1090 INPUT "1. alfi'sx* y=f ( x I 2. *b {’ftOr-TS'* r=f(a) 3. /r 4*4*>.X4 x= f (t) : y = g (t) 4 
. ,Z :CLS 

1100 ON Z GOTO 1110,1160,1210,1270 
1110 PRINT "y=f(x) =7 t4*' t3. " 

1120 LIST 1140 

1130 LOCATE 0,2'.PRINT "GOTO 1140" : STOP 

1140 DEF FNY(x)=2*X-3 

1150 Z=i: GOTO 1320 

1160 PRINT "r=f(a) 9 r**' t3. " 

1170 LIST 1190 

1180 LOCATE 0,2:PRINT "GOTO 1190" :STOP 
1190 DEF FNr(s)=1 
1200 Z = 2:GOTO 1320 

1210 PRINT "x=f(t):y=g(t) 9 t3." 

1220 LIST 1240 

1230 LOCATE 0,2:PRINT "GOTO 1240" :STOP 

1240 DEF FNf(t) = l*(T-SIN(T)) :DEF FNg(t) = 1 *(1-COS(t)) 

1250 INPUT "Tmin.Tmax";Tmin,Tmax 
1260 Z=3:GOTO 1320 

1270 PRINT " 2^*=ta7t> J *•>?*** a • X* 2 + H • XY+b • Y“ 2+G • X + F • Y+c = 0 ) " 

1280 INPUT " a,H,b,G,F,c 9 INPUT ta ";a,H,b,G,F,c 

1290 A$( 1 ) = STR$(a):A${2)=STR$(H):A$(3)=STR$(b):A$(4)=STR$(G):A$(5)=STR$(F): 

A$(6)=STR$(c) 

1300 h = H/2:g=G/2:f=F/2 :Z=4 
1310 * 

1320 CLS4:ON ERROR GOTO 3310 

1330 PRINT b 9 INPUT 13." 

1340 LOCATE 2,2 :INPUT " ( 1 , 1 ) = ";M$(1,1) : A( 1 , 1 )=CALC(M$(1,1)) 

1350 LOCATE 22,2:INPUT "(1,2)=";M$(1,2):A(1,2)=CALC(M$( 1,2 ) ) 

1360 LOCATE 2,4 :INPUT "(2,1) = ";MS(2,1):A(2,1)=CALC(M$(2, 1 ) ) 

1370 LOCATE 22,4:INPUT "(2,2)=";MS(2,2):A(2,2)=CALC(M$(2,2 ) ) 

1380 D=A(1,1)*A(2,2)-A(1,2)*A(2,1) 

1390 IF D=0 THEN PRINT "**+?*♦ abl/7 •/>*•* W 
1400 INIT:WIDTH 80:CLS4 

1410 INPUT " n>4 ( Xn<X<Xm ):Xn,Xm";Xn,Xm 
1420 INPUT " ( Yn<Y<Ym ):Yn,Ym";Yn,Ym 

1430 WINDOW {240,0)—(639,199),(Xn,Ym)-(Xm,Yn) 

1440 LINE(Xn,0)-(Xm,0),PSET:LINE(0,Yn)-(0,Ym),PSET:Sx=(Xm-Xn)/20:Sy= <Ym-Yn)/20 
1450 FOR 1=0 TO 20:LINE(Xn+Sx*I,-.06*Sy)-(Xn+Sx*I,.06*Sy) ,PSET: 

LINE(-.05*Sx,Yn+Sy*I)-(.05*Sx,Yn+Sy*I),PSET: 

NEXT I 

1460 ON Z GOTO 1470,1520,1570,1620 

1470 X00=999:YO0=999:XX00=999:YY00=999 

1480 FOR X=-10 TO 10 STEP .125 

1490 y=FNY(x) :GOSUB 2930 

1500 NEXT x 

1510 GOTO 3200 

1520 X00=999:Y00=999:XX00=999:YY00=999 

1530 FOR s = 0 TO 2*x+.l STEP .125 

1540 x=FNr(a)*COS(a):y=FNr(a)*SIN(a):GOSUB 2930 

1550 NEXT s 

1560 GOTO 3200 

1570 X00=999:YO0=999:XX00=999:YY00=999 
1580 FOR t=Tmin TO Tmax STEP .125 
1590 x=FNf(t):y=FNg(t):GOSUB 2930 
1600 NEXT t 
1610 GOTO 3200 

1620 DTAA=a*b*c+2*h*f*g-g*g*b-a*f*f-c*h*h:DTA=a*b-h*h 

1630 IF DTA=0 GOTO 2320 

1640 x0=(f*h-b*g)/DTA:y0=(g*h-a*f)/DTA 

1650 fx0y0=DTAA/DTA 

1660 IF fX0y0=0 GOTO 2010 

1670 IF a-b=0 THEN TT=n/2 : t=7t/4 ELSE TT=ATN( 2*h/(a-b) ) : t=TT/2 

1680 aa=((a+b)+(a-b)*COS(TT))/2+h*SIN(TT):bb=((a+b)-(a-b)*COS(TT))/2-h*SIN(TT) 
1690 AAA=-aa/fx0yO:BBB=-bb/fx0y0 

1700 IF AAA<0 AND BBB<0 THEN PRINT "=^b J **x>" : GOTO 3000 
1710 IF AAA*BBB<0 GOTO 1810 
1720 'r 

1730 X00=999:Y00=999:XX00=999:YY00=999 

1740 FOR s = 0 TO 2 *n +.1 STEP .125 

1750 XX=SQR(l/AAA)*COS(s):YY=SQR(1/BBB)*SIN(s) 

1760 X=XX*COS(t)-YY*SIN(t)+x0:Y=XX*SIN(t)+YY*COS(t)+v0 
1770 GOSUB 2930 
1780 NEXT s 
1790 GOTO 3000 
1800 

1810 IF BBB<0 GOTO 1910 
1820 V=-l 

1830 X00=999:Y00 = 999:XX00 = 999.'YY00 = 999 
1840 FOR s=-4 TO 4 STEP .125 

1850 XX=SQR(1/ABS(AAA))*(EXP(a)-EXP(-a))/2:YY=V*SQR(1/ABS(BBB))*(EXP(a)+EXP(-a) 
)/ 2 

1860 X = XX*COS (t.) -YY*SIN (t) + X0 : Y = XX*SIN ( t) +YY*COS (t) + y0 
1870 GOSUB 2930 
1880 NEXT a 

1890 IF V=-l THEN V=l:GOTO 1830 
1900 GOTO 3000 
1910 V=-l 

1920 X00=999:YO0=999:XX00=999:YY00=999 
1930 FOR a=-4 TO 4 STEP .125 

1940 XX=V*SQR(1/ABS(AAA))*(EXP(a)+EXP(-s))/2:YY=SQR(1/ABS(BBB))*(EXP(a)-EXP(-a) 
)/2 

1950 X=XX*COS(t)-YY*SIN(t)+x0:Y=XX*SIN(t)+YY*COS(t)+y0 
1960 GOSUB 2930 
1970 NEXT s 

1980 IF V=-1 THEN V=1:GOTO 1920 
1990 GOTO 3000 
2000 

2010 IF DTA>0 THEN PRINT "=tB ) --^flirt's" : GOTO 3000 
2020 IF b=0 GOTO 2130 


#571 


y=x 2 - 2 x -2 

W6(3o*) hi mm 

um (Xn<X<Xm) :Xn,Xm? -20,20 
(Y«<Y<Yw) : Yn.Ym? -20,20 
if m 

[ cos(n-/6) -sin(ff/6)'l 
sin(7r/6) cos(n-/6)J 



#57 & 


y=x 2 - 2 x -2 

%m (Xn<X<Xm) : Xn, Xm ? -20,20 
(Y«<Y<Ym) : Yn, Ym? -20,20 
if 5 IJ 

[::] 
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2030 Ll=(-h+SGN(-h+.000001)*SQR(-DTA))/b :L2=a/(b*Ll):GOTO 2040 
2040 V = -1:L=L1 

2050 X00=999:Y00=999:XX00=999:YY00=999 

2060 FOR s=-10 TO 10 STEP .125 

2070 XX = s :YY = L*s 

2080 X=XX+x0:Y=YY+y0 

2090 GOSUB 2930 

2100 NEXT s 

2110 IF V = -l THEN V=1:L=L2:GOTO 2050 
2120 GOTO 3000 

2130 IF A = 0 GOTO 2250 ELSE LINE(X0,0)-(x0,399),PSET,2 

2140 LINE((A(1,1)*x0-10*A(1,2)),(A(2,1)*x0-10*A(2,2)))-(<A(1,1)*X0+10*A{1,2)), 
(A(2,1)*x0+10*A{2,2))),PSET,4 
2150 IF h=0 GOTO 2230 

2160 X00=999:Y00=999:XX00=999:YY00=999 

2170 FOR s=-10 TO 10 STEP .125 

2180 XX=s:YY=-a/(2*h)*a 

2190 X=XX+x0:Y=YY+y0 

2200 GOSUB 2930 

2210 NEXT s 

2220 GOTO 3000 

2230 PRINT 

2240 GOTO 3000 

2250 IF H = 0 THEN PRINT "t*V'W :GOTO 3000 

2260 LlNE(x0,-10)-(x0,10),PSET,2 

2270 LINE((A(1,1)*x0-10*A(1,2)),(A(2,1) *x0-10*A(2,2)))-((A(1,1)*X0 +10*A<1,2)), 
(A(2,1) *x0+ 10*A(2,2))),PSET,4 
2280 LINE!-10,y0)-(10,y0),PSET,2 

2290 LINE((-10*A(1,1)+A(1,2)*y0),(-10*A(2,1)+A{2,2)*y0))-(<10*A<1,1)+A(1,2)*y0 
),(10»A{2,1)+A(2,2)*y0)),PSET,4 
2300 GOTO 3000 
2310 ’4:07* 

2320 IF h=0 GOTO 2540 

2330 bb=(a*a»a+2*a*h*h+b*h*h)/(a*a4h*h):gg= ( g«h-a*f)/SQR(a*a+h*h): 

ff=(a*g+f*h)/SQR(a*a+h*h) 

2340 IF gg = 0 GOTO 2450 

2350 yy0=-ff/bb:xx0=ff*ff/(2*gg*bb)-c/{2*gg): p = -gg/(2*bb) 

2360 x0=(h*xx0+a*yy0)/SQR(a*a+h*h):y0=(-a*xx0+h*yy0)/SQR(a*a+h*h) 

2370 X00=999:Y00=999:XXO0=999:YY00=999 
2380 Ep=5/p 

2390 FOR s=-Ep TO Ep STEP .125*SGN(p) 

2400 XX=p*s*s:YY=2*p*s 

2410 X=(h*XX+a*YY)/SQR(a*a+h*h)+xO :Y=(-a*XX+h*YY)/SQR(a*a+h*h)+y0 
2420 GOSUB 2930 
2430 NEXT s 
2440 GOTO 3000 

2450 IF ff*ff-bb*c<0 THEN PRINT "U'Vr'y IT *4":GOTO 3000 

2460 ,vy0 = -fI7bb:xx0 = 0:xO=a*yy0/SQR<a*a + h*h ) : y0 = h* y.v0/SQR ( a *a+h *h ) : V = -l 
2470 X00=999:Y00=999:XX00=999:YY00=999:CC=SQR(ff*ff-bb*c)/bb 
2480 FOR s=-l0 TO 10 STEP .125 
2490 YY=V*CC:XX=s 

2500 X=(h*XX+a*YY)/SQR(a*a+h*h)+xO :Y=(-a*XX+h»YY)/SQR(a*a+h*h)+y0 
2510 GOSUB 2930 

2520 NEXT s :IF V=-l THEN V=l:GOTO 2470 

2530 GOTO 3000 

2540 IF a=0 GOTO 2740 

2550 IF f=0 GOTO 2650 

2560 x0=-g/a:y0=(g*g-a*c)/(2*a*f):p=-f/(2*a) 

2570 X00 = 999:Y00 = 999:XXO0 = 999:YY00 = 999 
2580 Ep=5/p 

2590 FOR s = -Ep TO Ep STEP .125*SGN<p) 

2600 YY=p*s*s:XX=2*p*9 

2610 X=XX+xO :Y=YY+yO 
2620 GOSUB 2930 
2630 NEXT s 
2640 GOTO 3000 

2650 IF g*g-a*c<0 THEN PRINT ** *4" : GOTO 3000 

2660 x0=-g/a 

2670 XX=SQR(g*g-a*c)/a:X=XX+x0 

2680 LINE((XX+x0),-10 )-((XX + xO),10),PSET,2 

2690 LINE!(A(1,1)*(XX+X0)- 10*A(1,2)),(A(2, l)*(XX+x0)-10*A(2,2))) — <(A(1,1)*(XX + 
x0)+10*A( l ,2)),(A(2,1)*(XX + x0) + 10*A(2,2))),PSET,4 
2700 XX=-XX:X=XX+x0 

2710 LINE((XX+x0),-10)-((XX+x0),10),PSET,2 

2720 LINE((A(1,1)*(XX+x0)-10*A(1,2)),(A(2,1)*(XX+xO)-10*A(2,2)))-((A(1,1)*(XX+ 

x0)+10*A(1,2)),(A(2,1)*(XX+X0)+10*A(2,2))),PSET,4 

2730 GOTO 3000 

2740 IF g=0 GOTO 2840 

2750 y0=-f/b:x0=(f*f-b*c)/(2*b*g):p=-g/(2*b) 

2760 X00=999:Y00=999:XX00=999:YY00=999 
2770 Ep=5/p 

2780 FOR s = -Ep TO Ep STEP .125*SGN(p) 

2790 XX=p*s*s:YY=2*p*s 
2800 X=XX+x0 :Y=YY+y0 
2810 GOSUB 2930 
2820 NEXT s 
2830 GOTO 3000 

2840 IF f*f-b*c<0 THEN PRINT "** 7f> :GOTO 3000 

2850 y0=-f/b 

2860 YY = SQR(f* f-b*c)/b:Y = YY + y0 

2870 LINE!-10,(YY+y0))-(10,(YY+y0)),PSET,2 

2880 LINE((-10*A(1,1)+A(1,2)*(YY + y0)),(-10 * A(2,1)+A(2,2)*(YY + y0)))-<(10*A(1,1) 

+A(1,2)*(YY+y0)),(10*A(2,l)+A(2,2)*(YY+y0))),PSET,4 
2890 YY=-YY:Y=YY+y0 

2900 LINE(-10,(YY+y0))-(10,(YY+y0)),PSET,2 

2910 LINE(( — 10 * A(l,1) + A(1,2)*(YY+y0)),(-10*A(2,1)+A(2,2)*(YY + y0)))-((10*A(l,l) 

+A(1,2)*(YY+y0)),(10*A(2,1)+A(2,2)*(YY+y0))),PSET,4 
2920 GOTO 3000 

2930 XX = A(1,1)*X+A(1,2)*Y:YY=A(2,1)*X + A(2,2)*Y 

2940 IF X00=999 GOTO 2980 

2950 IF Y00=999 GOTO 2980 

2960 LINE(X00,Y00)-(X,Y),PSET,2 

2970 LINE(XX00,YYO0)-(XX,YY),PSET,4 

2980 XX00=XX:YY00=YY:X00=X:Y00=Y 

2990 RETURN 

3000 PRINT " **7fO*" 

3010 FOR 1=1 TO 6 

3020 IF VAL(A $(I) )=0 THEN A$(I) = "":GOTO 3060 

3030 IF LEFTS(AS(I),1)=" " THEN AS(I)="+"+RIGHTS(AS(I),LEN(AS(I))-1) 

3040 IF VAL(AS(I))=1 THEN AS(I)="+" 

3050 IF VAL(AS(I))=-l THEN A$(I)="-" 


<7373 


y=2x-Z 

IB® (Xn<X<Xm) : Xn, Xm ? -10,10 
(Yn<Y<Ym) : Yn, Ym ? -10,10 

ft m 

(i -:) 



<737 4 


x 2 +2xy+3y >:i -x-2y-6 = 0 

m t 50 L fc t '<7)' X-m R ±.<r>& (i r ^ 

IB® (Xn<X<Xm) : Xn,Xm ? -10,10 
(Yn < Y < Yw) : Yw, Yw ? -10,10 
(.25, .25) 

ft M 

U-l 
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3060 NEXT I 

3070 IF A$(6) = " + " THEN A$(6) = ’ , + l" 

3080 IF A$ ( 6 ) = THEN A$(6)="-l" 

3090 LOCATE 3,3 

3100 IF A$ (1)0"" THEN PRINT A$(1);"X*2"; 

3110 IF AS(21OTHEN PRINT A $(2);"X•Y"; 

3120 IF AS(3)< >"" THEN PRINT A$(3);"Y~2"; 

3130 IF A$(4)<>"" THEN PRINT AS(4);"X"; 

3140 IF AS (5)0"" THEN PRINT A$(5);"Y"; 

3150 IF A$(6)<>"" THEN PRINT AS(6); 

3160 PRINT "=0":PRINT 

3170 IF CHARACTERS(3,3)="+" THEN LOCATE 3,3:PRINT " " 
3180 PRINT 

3190 PRINT ’• j trta^ (" ;x0; " , " ;y0;" )" 

3200 PRINT "V i^9" 

3210 L=1 

3220 FOR 1=1 TO 2:FOR J=1 TO 2 

3230 IF L<LEN(M$(I,J)) THEN L=LEN(MS(I,J)) 

3240 NEXT:NEXT 

3250 PRINT "r";TAB(2*L+4);' V 

3260 PRINT "I ";M$(1,1) ;TAB(L+3);M$(1,2);TAB(2*L+4);" I” 
3270 PRINT "I";TAB(2*L+4) ; " I" 

3280 PRINT "I " ;M$ { 2,1 ) ;TAB( L+3 ) *,M$( 2,2 ) ;TAB( 2*L+4 ) ; ” I " 
3290 PRINT " ;TAB(2*L+4);"- ,M 

3300 END 

3310 Y00=999:Y=999 
3320 RESUME NEXT 


^■75 


r= 1 

1 (dr 

[DWil A, = 5, Ai = -2 

HU yl=(3,4), £ = (l,-l) 

5 "fp, 2 fg(Zg| / 

. / c 

g 

iEi (XH<X<Xw):X«,Xm? -10,10 / 

(Y«<Y<Yw) : Yw, Yw ? -10,10 ( y 

'n m v — 

ca 

7 




1000 1NIT:WIDTH 80 
1010 PR TNT " 

1020 PRINT ’’ * 2>'*9?t> ) !T 77 (to *>#>) *" 

1030 PRINT * *" 

1040 PRINT " t Xl/turbo [ Hu-Basic ] *" 

1050 PRINT " * 1987/3/20 T.Yaso *" 

1060 PRINT " ****«*************************************************" 

1070 PAUSE 15:CLS 

1080 PRINT " 2>'*a?t> ) a • X~ 2 + H • XY + b • Y" 2+G • X + F • Y+c = 0 J 

1090 INPUT H a,H,b,G,F,c 1 INPUT t3 M ;a,H,b,G,F,c 

1100 AS(1)=STR$(a):AS(2)=STR$(H):AS(3)=STR$(b):AS(4)=STR$(G):AS(5)=STRS(F): 
AS(6)=STR$(c) 


1110 h=H/2:g=G/2:f=F/2 
1120 CLS4 

1130 WINDOW (240,0)-(639,199),(-10,10)-<10,-10) 

1140 LINE(-10,O)-(10,0),PSET:LINE(0, 10 >-{0,-10),PSET 

1150 FOR I=-10 TO 10:LINE(I,.l)-(I,-.l),PSET:LINE(-.1,I)-(.1,I),PSET:NEXT I 
1160 LOCATE 30, 13: PRINT ’’-10" 

1170 LOCATE 78,13:PRINT "lO" 

1180 LOCATE 55,0 :PRINT " 10" 

1190 LOCATE 55,24: PRINT 10LOCATE 0,0 

1200 DTAA=a*b*c+2*h*f*g-g*g*b-a*f*f-c*h*h:DTA=a*b-h*h 

1210 IF DTA=0 GOTO 1930 


1220 x0=(f*h-b*g)/DTA:y0=(g*h-a*f)/DTA 

1230 f x0yO = DTAA/DTA 

1240 IF fX0y0=0 GOTO 1630 

1250 IF a-b = 0 THEN TT=tc/ 2 : t = 7r/4 ELSE TT=ATN (2 *h/(a-b) ) : t=TT/2 

1260 aa=((a+b)+(a-b)*COS(TT))/2+h*SIN(TT):bb=((a+b)-(a-b)*COS(TT))/2-h*SIN<TT) 
1270 AAA=-aa/fxOy0:BBB=-bb/fx0y0 

1280 IF AAA<0 AND BBB<0 THEN PRINT ”*a ) y*x>":GOTO 2620 
1290 IF AAA*BBB<0 GOTO 1400 
1300 ’**x> 

1310 PRINT " 9'X's” 

1320 FOR s=0 TO 2*n +.1 STEP .1 

1330 XX=SQR{1/AAA)♦COS(s):YY=SQR(1/BBB)*SIN(s) 

1340 CL=4 :GOSUB 2540 

1350 X=XX*COS(t)-YY*SIN(t)+x0:Y=XX*SIN(t)+YY*COS(t)+y0 

1360 CL=2:GOSUB 2580 

1370 NEXT s 

1380 GOTO 2620 

1390 + a9t> 

1400 PRINT " MtaPt's" 

1410 IF BBB<0 GOTO 1520 
1420 V=-l 


1430 X0Q=0:Y00=0:XX00=0:YY00=0 
1440 FOR s=-4 TO 4 STEP .1 

1450 XX=SQR(1/ABS(AAA))*(EXP(s)-EXP(-s))/2:YY=V*SQR(1/ABS(BBB))*(EXP(s)+EXP(-s) 
)/2 

1460 CL=4 :GOSUB 2540 

1470 X=XX*COS(t)-YY*SIN(t)+x0:Y=XX*SIN(t)+YY*COS(t)+y0 
1480 CL=2:GOSUB 2580 
1490 NEXT s 

1500 IF V=-l THEN V=l:GOTO 1430 
1510 GOTO 2620 
1520 V=-1 

1530 XXO0=0:YY00=0:X00=0:Y00=0 
1540 FOR s=-4 TO 4 STEP .1 

1550 XX=V*SQR(1/ABS(AAA))*(EXP(s)+EXP(-s))/2:YY=SQR(1/ABS(BBB))*(EXP(s)-EXP(-s) 
)/2 

1560 CL=4 :GOSUB 2540 

1570 X=XX*COS<t)-YY*SIN(t)+x0:Y=XX*SIN(t)+YY*COS(t)+y0 
1580 CL=2:GOSUB 2580 

1590 NEXT s 

1600 IF V=-l THEN V=1:GOTO 1530 
16TO GOTO 2620 
1620 ’*a*t> 

1630 IF DTA>0 THEN PRINT "*■ J xfa?t>":GOTO 2620 
1640 IF b=0 GOTO 1760 

1650 Ll=(-h+SGN(-h+.000001)*SQR(-DTA))/b :L2=a/(b*Ll):GOTO 1660 
1660 V=-1:L=L1 

1670 XX00=0:YY00=0:X00=0:Y00=0 

1680 FOR s=-10 TO 10 STEP .1 

1690 XX=s :YY=L*s 

1700 CL=4 :GOSUB 2540 

1710 X=XX+x0:Y=YY+y0 

1720 CL=2:GOSUB 2580 

1730 NEXT s 


B 
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1740 IF V=-l THEN V=1:L=L2:GOTO 1670 
1750 GOTO 2620 

1760 IF A=0 GOTO 1880 ELSE LINE(0,-10)-(0,10 ),PSET,4: 

LINE(x0,-10)-(x0,10),PSET,2 

1770 IF h=0 GOTO 1860 

1780 XX00=0:YY00=0:X00=0:Y00=0 

1790 FOR s=-10 TO 10 STEP .1 

1800 XX=s:YY=-a/(2*h)*s 

1810 CL=4 :GOSUB 2540 

1820 X=XX+x0:Y=YY+y0 

1830 CL=2:GOSUB 2580 

1840 NEXT s 

1850 GOTO 2620 

1860 PRINT "4v+n 

1870 GOTO 2620 

1880 IF H = 0 THEN PRINT "t*V'W:GOTO 2620 

1890 LINE(0,-10)-(0,10),PSET,4:LINE(x0,-10)-(x0,10),PSET,2 

1900 LINE(- 10,0)-(10,0),PSET,4:LINE(-10,y0)-( 10,y0),PSET,2 
1910 GOTO 2620 
1920 ***77 -vt> 

1930 PRINT " *b7-7t>" 

1940 IF h=0 GOTO 2170 

1950 bb=(a*a*a+2*a*h*h+b*h*h)/(a*a+h*h):gg=Ig*h-a*f)/SQR(a*a+h*h): 

ff=(a*g+f*h)/SQR(a*a+h*h) 

I960 IF gg = 0 GOTO 2080 

1970 yy0=-ff/bb:xx0=ff*ff/(2*gg*bb)-c/(2*gg):p=-gg/(2*bb) 

1980 x0=(h*xx0+a*yy0)/SQR(a*a+h*h):y0=(-a*xx0+h*yy0)/SQR(a*a+h*h) 

1990 XX00=0:YYO0=0:X00=0:Y00=0 
2000 Ep=5/p 

2010 FOR a=-Ep TO Ep STEP .l*SGN(p) 

2020 XX=p*s*s:YY=2*p*s 
2030 CL=4:GOSUB 2540 

2040 X=(h*XX+a*YY)/SQR(a*a+h*h)+x0:Y=(-a*XX+h*YY)/SQR(a*a+h*h)+yO 
2050 CL=2:GOSUB 2580 
2060 NEXT s 
2070 GOTO 2620 

2080 IF ff * ff-bb*c<0 THEN PRINT "J-* 7f> ** t-CrGOTO 2620 

2090 yy0=-ff/bb:xx0=0:x0=a*yy0/SQR(a*a+h*h):y0=h*yy0/SQR(a*a+h*h):V=-1 

2100 XX00=0:YY00=0:X00=0:Y00=0 :CC=SQR{ff*ff-bb*c)/bb 

2110 FOR s=-10 TO 10 STEP .1 

2120 YY=V*CC:XX=s:CL=4:GOSUB 2540 

2130 X=(h*XX+a*YY)/SQR(a*a+h*h)+x0:Y=(-a*XX+h*YY)/SQR(a*a+h*h)+yO 
2140 CL=2:GOSUB 2580 

2150 NEXT s :IF V=-l THEN V=l:GOTO 2100 

2160 GOTO 2620 

2170 IF a = 0 GOTO 2360 

2180 IF f=0 GOTO 2290 

2190 x0=-g/a:y0=(g*g-a*c)/(2*a*f):p=-f/(2*a) 

2200 XX0=0:YY0O=0:X00=0:YO0=0 
2210 Ep=5/p 

2220 FOR s=-Ep TO Ep STEP .l*SGN(p) 

2230 YY=p*s*s:XX=2*p*s 
2240 CL=4:GOSUB 2540 
2250 X=XX+xG:Y=YY+y0 
2260 CL=2:GOSUB 2580 
2270 NEXT s 
2280 GOTO 2620 

2290 IF g*g-a*c<0 THEN PRINT tJ” JGOTO 2620 

2300 x0=-g/a 

2310 XX=SQR(g*g-a*c)/a:X=XX+x0 

2320 LINE (XX,-10)-(XX,10),PSET,4:LINE(XX+x0,-10)-(XX4x0,10),PSET,2 
2330 XX=-XX:X=XX+x0 

2340 LINE (XX,-10)-(XX,10),PSET,4:LINE(XX+x0,-10)-(XX+x0,10),PSET,2 

2350 GOTO 2620 

2360 IF g=0 GOTO 2470 

2370 y0=-f/b:x0=(f*f-b*c)/(2*b*g):p=-g/(2*b) 

2380 XX00=0:YY00=0:X00=0:Y00=0 
2390 Ep=5/p 

2400 FOR s=-Ep TO Ep STEP . l*SGN(p) 

2410 XX=p*s*9:YY=2*p*s 
2420 CL=4:GOSUB 2540 
2430 X=XX+x0:Y=YY+y0 
2440 CL=2:GOSUB 2580 
2450 NEXT s 
2460 GOTO 2620 

2470 IF f*f-b*c<0 THEN PRINT ** *4 ": GOTO 2620 

2480 y0=-f/b 

2490 YY=SQR(f*f-b*c)/b:Y=YY+y0 

2500 LINE (-10,YY)-(10,YY),PSET,4:LINE(-10,YY+y0)-(10,YY+y0),PSET,2 
2510 YY=-YY:Y=YY+y0 

2520 LINE (-10,YY)-(10,YY),PSET,4:LINE(-10,YY+y0)-(10,YY+y0),PSET,2 
2530 GOTO 2620 

2540 IF XX00=0 GOTO 2560 

2550 LINE(XX00,YY00)-(XX,YY),PSET,CL 
2560 XX00=XX:YY00=YY 
2570 RETURN 

2580 IF X00=0 GOTO 2600 

2590 LINE(X00,Y00)-(X,Y),PSET,CL 

2600 X00=X:Y00=Y 

2610 X00=X:Y00=Y: RETURN 

2620 PRINT " 

2630 FOR 1=1 TO 6 

2640 IF VAL( A$ ( I ) ) =0 THEN A$ (I )=’"':GOTO 2680 

2650 IF LEFTS(A$(I),1)=" " THEN AS(I)="+"+RIGHTS(AS(I),LEN(AS(I))-1) 
2660 IF VAL(AS(I))=1 THEN A$(I)="+" 

2670 IF VAL(AS(I))=-1 THEN AS(I)="-" 

2680 NEXT I 

2690 IF AS (6 ) = " + " THEN AS(6)= ,, + 1 M 
2700 IF A$(6)="-" THEN A$(6)="-1 M 
2710 LOCATE 3,2 

2720 IF AS(1)<>"" THEN PRINT A$(1);"X"2"; 

2730 IF AS(2)<>"" THEN PRINT AS(2);”X•Y"; 

2740 IF AS(3)<>"" THEN PRINT AS(3);"Y^2"; 

2750 IF AS(4)< >"" THEN PRINT AS(4) ;"X”; 

2760 IF A$(5)<>"" THEN PRINT A$(5);"Y"; 

2770 IF AS(6)< >”" THEN PRINT A $ < 6); 

2780 PRINT "=0":PRINT 

2790 IF CHARACTERS(3,2)="+" THEN LOCATE 3,2:PRINT " " 

2800 PRINT 

2810 PRINT " fabj,>(f B br>) J Y*to-7 ( " ; x0 ; " , " ; y0 ; " ) " 

2820 END 


9 = z>~3~7 


mm 

x 2 -2x’y+y* + 4y- 11=0 



4 x 2 + x*y- 3 y 2 -x + Sy -3 = 0 

(0, I) 
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20 

20 

4F 

4F 

72 

AC 50 

20 

20 

20 

20 

20 

20 

20 

20 

00 

AC58 

20 

2A 

20 

20 

20 

20 

4F 

4F 

68 

AC60 

20 

20 

20 

20 

20 

20 

20 

20 

00 

AC68 

20 

20 

20 

20 

20 

20 

4F 

4F 

5E 

AC70 

4F 

4F 

4F 

4F 

4F 

4F 

4F 

4F 

78 

AC78 

4F 

4F 

4F 

4F 

4F 

4F 

4F 

20 

49 

SUM: 

72 

90 

5E 

5E 

5E 

68 

CF 

8C AF44 

AC80 

20 

20 

20 

7B 

20 

20 

2A 

20 : 

: 65 

AC88 

20 

20 

20 

20 

20 

20 

20 

20 : 

00 

AC90 

7B 

20 

20 

20 

20 

20 

20 

4F : 

: 8A 

AC 9 8 

20 

4F 

20 

7B 

2A 

4 F 

20 

7B : 

: IE 

ACA0 

20 

2A 

20 

20 

20 

20 

20 

20 : 

: 0 A 

ACA8 

20 

20 

20 

7B 

20 

20 

20 

20 : 

: 5B 

ACB0 

2A 

20 

20 

20 

20 

20 

20 

20 : 

: 0A 

ACB8 

20 

20 

20 

20 

20 

7B 

20 

20 : 

: 5B 

ACC0 

20 

3E 

20 

20 

20 

2A 

20 

4F : 

: 57 

ACC8 

20 

2A 

20 

20 

20 

20 

7B 

20 : 

: 65 

ACD0 

20 

20 

4F 

20 

4F 

20 

20 

20 : 

: 5E 

ACD8 

20 

20 

20 

20 

4F 

20 

20 

4F : 

: 5E 

ACE0 

20 

20 

20 

20 

20 

2A 

20 

2A : 

: 14 

ACE8 

20 

2A 

20 

20 

20 

20 

20 

20 ; 

: 0A 

ACF0 

2A 

20 

20 

20 

20 

20 

2A 

20 : 

: 14 

ACF8 

20 

4 F 

7B 

7B 

20 

20 

20 

20 : 

: E5 

SUM: 

6F 

9A 

8A 

6C 

68 

9E 

6F 

F2 540C 

AD00 

20 

20 

7 B 

20 

20 

20 

20 

20 : 

: 5B 

AD08 

2A 

20 

20 

20 

20 

20 

20 

20 : 

: 0A 

AD 10 

20 

20 

20 

20 

4F 

20 

20 

7B : 

: 8A 

AD 18 

7B 

20 

20 

20 

20 

7B 

20 

20 : 

: B6 

AD20 

20 

40 

20 

20 

40 

20 

20 

20 : 

: 40 

AD28 

20 

20 

20 

20 

2A 

20 

20 

2A : 

: 14 

AD30 

7B 

7B 

7B 

7B 

20 

20 

20 

20 : 

: 60 

AD38 

20 

20 

20 

20 

20 

20 

20 

20 : 

: 00 

AD40 

20 

7B 

7B 

20 

20 

20 

7B 

7B : 

; 60 

AD4 8 

7B 

7B 

7 B 

7B 

7B 

20 

20 

20 : 

: 07 

AD50 

20 

7B 

7B 

20 

20 

20 

7B 

20 : 

: 11 

AD58 

20 

20 

20 

2A 

20 

20 

20 

20 : 

: 0A 

AD60 

20 

7B 

7 B 

20 

20 

2A 

7B 

20 : 

: IB 

AD68 

40 

20 

20 

20 

20 

20 

20 

20 : 

; 20 

AD70 

20 

7B 

7B 

20 

20 

20 

7B 

7B : 

: 60 

AD78 

7B 

7B 

7B 

7 B 

7B 

20 

20 

20 : 

: 07 

SUM: 

96 

9D 

D8 

IB 

0F 

65 

60 

IB EA9B 


AD80 

20 

7B 

7B 

20 

20 

20 

7B 

7B : 

: 60 

AD88 

7B 

20 

20 

20 

20 

20 

20 

20 : 

: 5B 

AD90 

7B 

7B 

7B 

7B 

20 

20 

7B 

7B 

: 22 

AD98 

7B 

20 

40 

20 

20 

3E 

20 

4F 

: 08 

ADA0 

20 

20 

20 

20 

20 

20 

7B 

7B 

: B6 

ADA8 

7B 

20 

20 

20 

20 

20 

20 

20 

: 5B 

ADB0 

20 

2A 

20 

20 

20 

20 

2A 

20 

: 14 

ADB8 

20 

20 

20 

20 

40 

20 

40 

4F 

: 6F 

ADC0 

20 

20 

20 

20 

20 

20 

20 

20 

: 00 

ADC8 

20 

20 

20 

20 

20 

20 

4F 

20 

: 2F 

ADD0 

20 

20 

20 

20 

20 

20 

20 

20 

: 00 

ADD8 

20 

20 

20 

20 

20 

20 

20 

20 

: 00 

ADE0 

20 

4F 

2A 

2A 

2A 

4F 

4F 

2A 

: B5 

ADE8 

2A 

2A 

2A 

2 A 

2A 

20 

20 

20 

: 32 

ADF0 

20 

4F 

2A 

4F 

2A 

2A 

2A 

2 A 

: 90 

ADF8 

4F 

2A 

2A 

4F 

2A 

20 

20 

20 

: 70 

SUM: 

A5 

32 

FE 

CD 

48 

57 

A3 

83 4440 

AE00 

20 

4F 

2A 

2A 

2A 

2A 

2A 

2A 

6B 

AE08 

4F 

2A 

2A 

2A 

2A 

20 

20 

20 

57 

AE10 

20 

2A 

2A 

2A 

2A 

2A 

4F 

2A 

6B 

AE18 

2A 

2A 

2A 

4F 

4F 

20 

20 

20 

70 

AE20 

20 

2A 

2A 

2A 

2A 

2A 

2A 

2A 

46 

AE28 

2A 

2A 

2A 

2A 

4F 

20 

20 

20 

57 

AE30 

20 

3E 

2A 

2A 

4F 

4F 

2A 

2A 

A4 

AE38 

4F 

2A 

2A 

2A 

4F 

20 

20 

20 

70 

AE40 

20 

20 

20 

20 

20 

20 

20 

20 

00 

AE4 8 

20 

20 

20 

20 

20 

20 

20 

4F 

2F 

AE50 

20 

20 

20 

20 

20 

20 

20 

20 

00 

AE58 

20 

20 

20 

20 

20 

20 

4F 

20 

2F 

AE60 

7B 

20 

20 

20 

20 

20 

20 

20 

5B 

AE68 

20 

20 

20 

20 

20 

20 

20 

2A 

0A 

AE7 0 

20 

20 

20 

20 

20 

20 

20 

20 

00 

AE7 8 

20 

20 

20 

20 

20 

20 

20 

20 

00 

SUM: 

CD 

89 

50 

75 

E4 

4D 

70 

61 B0B1 

AE80 

7B 

20 

40 

20 

20 

4F 

4F 

4F 

08 

AE88 

4F 

4F 

20 

20 

40 

20 

20 

7B 

D9 

AE90 

7B 

20 

20 

40 

20 

4F 

4F 

4F 

08 

AE98 

4F 

4F 

20 

40 

20 

20 

20 

20 

7E 

AEA0 

20 

20 

20 

20 

40 

4F 

4F 

2A 

88 

AEA8 

4F 

4F 

40 

20 

20 

20 

20 

20 

7E 

AEB0 

20 

20 

20 

40 

20 

4F 

4F 

4F 

AD 

AEB8 

4F 

4F 

20 

40 

20 

20 

20 

20 

7E 

AEC0 

20 

20 

40 

20 

20 

4F 

4F 

4F 

AD 

AEC8 

4F 

4F 

20 

20 

40 

20 

20 

20 

7E 

AED0 

20 

20 

20 

20 

20 

20 

20 

20 

00 

AED8 

20 

20 

20 

20 

20 

20 

20 

20 

00 

AEE0 

20 

20 

20 

20 

20 

20 

20 

20 

00 

AEE8 

20 

20 

20 

20 

20 

20 

20 

20 

00 

AEF0 

20 

20 

20 

20 

20 

20 

20 

20 

00 

AEF8 

20 

20 

20 

20 

20 

20 

3E 

20 

IE 

SUM: 

A1 

EB 

60 

80 

60 

EB 

09 

21 3B87 

AF00 

20 

20 

4F 

7B 

20 

4F 

20 

20 

B9 

AF08 

20 

4F 

20 

20 

20 

4F 

20 

20 

5E 

AF 10 

20 

20 

20 

20 

20 

20 

20 

4F 

2F 

AF 18 

20 

7B 

20 

2A 

20 

2A 

20 

7B 

CA 

AF20 

20 

20 

20 

4F 

20 

40 

2A 

20 

59 

AF28 

20 

20 

4F 

20 

20 

20 

40 

20 

4F 

AF30 

40 

4F 

2A 

20 

2A 

20 

20 

40 

83 

AF38 

20 

40 

2A 

40 

4F 

4F 

20 

20 

A8 

AF40 

4F 

20 

40 

2A 

20 

3E 

20 

2A 

81 

AF48 

2A 

2A 

20 

20 

20 

20 

20 

4F 

43 

AF50 

20 

20 

2A 

20 

40 

20 

20 

20 

2A 

AF58 

20 

20 

20 

4 F 

20 

40 

4F 

20 

7E 

AF60 

2A 

40 

4F 

40 

4 F 

7B 

20 

40 

23 

AF68 

20 

40 

20 

20 

2A 

2A 

20 

20 

34 

AF70 

20 

4F 

20 

20 

20 

20 

4F 

20 

5E 

AF78 

20 

2A 

20 

20 

20 

7B 

20 

20 

65 

SUM: 

63 

50 

CB 

0D 

92 

B5 

88 

03 DC33 

AF80 

4F 

20 

20 

40 

2A 

20 

20 

20 

: 59 

AF88 

40 

2A 

4F 

20 

20 

20 

20 

20 : 

: 59 

AF90 

20 

20 

20 

20 

4F 

20 

20 

4F : 

: 5E 

AF98 

20 

20 

20 

20 

4F 

20 

40 


: 2F 

SUM: 

CF 

8A 

AF 

A0 

E8 

80 

A0 

8F ! 

5714 


*5»i'y-xux * 


A000 

AOOO 

AOOO 

AOOO 

AOOO 

AOOO 

AOOO 


AOOO 

AOOO 

AOOO 

AOOO 

AOOO 

AOOO 3E 01 
A002 32 DA AO 
A0O5 3E OC 
A007 CD F4 IF 
AOOA 

AOOA 11 DB AO 
A0OD 06 OB 
A00F 
AOOF LA 
AO 10 6F 
A011 13 


START $A0O0 
IPRINT EQU $ 1FF4 
#PRINTS EQU $ 1FF1 
#MSX EQU S1FE5 
IMPRINT EQU $ 1FE2 
#GETKY EQU S1FD0 
EQU $ 1FC4 
EQU S201B 
EQU $20 IE 
EQU $2030 


I BELL 
tSCRN 
#LOC 
IWIDTH 


A, 1 

(ROUND), 
A i $0C 
IPRINT 


A,(DE) 
L, A 


AO 1 £ 1A 

AO 13 67 

AO 14 13 

AO 15 CD IE 20 

A018 

AO 18 CD E5 IF 
AO 1B 21 09 00 
A01E 19 
A01F 54 5D 
A021 10 EC 
A023 

AO23 21 03 0A 
A026 CD IE 20 
A029 11 C7 AO 
A02C CD E5 IF 
A02F 21 03 15 
A032 CD IE 20 
A035 CD E5 IF 
A038 
A038 
A038 

A038 3A DA AO 
A03B 3D 
A03C 3C 20 05 


25 LD A,(DE) 

26 LD 11, A 

27 INC DE 

28 CALL #LOC 

29 

30 CALL #MSX 

31 LD HLi9 

32 ADD HL,DE 

33 LD DEiHL 

34 DJNZ LOOP 

35 


36 

37 

38 

39 

40 

41 

42 

43 

44 

45 NAKAMI 

46 

47 

48 


LD HLi$0AO3 

CALL #LOC 

LD DEiWALL 

CALL #MSX 

LD HL,$ 1503 

CALL #LOC 

CALL #MSX 


LD A,(ROUND) 

DEC A 

IF INC(A)=0 THEN LD A,$0C JP #PRINT 


112 Oh! MZ 1987.8. 


fen ftwi 09) 
























SENTINEL 


A03F 3K 0C C3 
A042 F4 IF 
A044 06 00 
A046 0E 0A 
A048 16 30 
A04A 

A04A FE OA 
A04C 38 04 
A04E 04 
A04F 91 
A050 18 F8 
A052 

A052 21 11 07 
A055 CD IE 20 
A058 82 
A059 CD F4 IF 
A05C 3E ID 
A05E CD F4 IF 
A061 CD F4 IF 
A0G4 78 
A065 82 
A066 CD F4 IF 
A069 
A069 
A069 AF 
A06A 32 62 A2 
A06D 3A DA AO 
A07O 47 
A071 21 7F A2 
A074 11 AO 00 
A07 7 
A077 19 
A078 10 FD 
A07 A 

A07A 44 4D 
A07C 21 00 0B 
A07F CD IE 20 
A082 26 0B 
A084 

A084 2E 04 
AQ86 CD E2 IF 
A089 20 20 20 
A08C 7B 00 
A08E 
A08E 0A 
A08F 03 
AO90 CD F4 IF 
A093 FE 2A 20 
HL 

A096 06 E5 21 
A099 62 A2 34 
A09C El 
A09D FE 3E 20 
HYO),A 

A0A0 08 7D 32 
A0A3 A8 A1 7C 
A0A6 32 A9 A1 
A0A9 2C 
A0AA 7D 
A0AB FE 14 28 
A0AE 02 18 DD 
A0B1 CD E2 IF 
A0B4 7B 0D 00 
A0B7 24 
A0B8 7C 
A0B9 FE 15 28 
A0BC 02 18 C5 
AOBF 

AOBF 3E 02 
A0C1 32 A7 A1 
A0C4 C3 53 A1 
A0C7 
A0C7 

A0C7 7B 7B 7B 
A0CA 7B 7B 7B 
A0CD 7B 7B 7B 
A0D0 7B 7B 7B 
A0D3 7B 7B 7B 
A0D6 7B 7B 7B 
A0D9 00 
A0DA 
A0DA 00 
A0DB 
A0DB 

A0DB 04 04 BA 
A0DE DE B2 BC 
A0E1 20 CB DB 
A0E4 B2 00 
A0E6 0A 07 52 
A0E9 4F 55 4E 
A0EC 44 3A 20 
A0EF 20 00 
A0F1 19 06 3E 
A0F4 20 54 41 
A0F7 4B 45 52 
A0FA 20 00 
A0FC 19 08 2A 
A0FF 20 47 4F 
A102 49 53 48 
A105 49 00 
A107 19 0A 7B 
A10A 20 57 41 
A10D 4C 4C 20 
A110 20 00 
A112 19 0C 40 
A116 20 53 54 
A118 4F 4E 45 
AlIB 20 00 
A11D 19 0E 4F 
Al20 20 48 4F 
A123 4C 45 20 
A126 20 00 
A128 1A 11 49 
A12B IF IF IF 
A12E IF ID 4B 
A131 20 00 
Al33 18 13 4A 
A136 20 3E 20 
A139 4C 20 52 
A13C 20 00 
Al3E IF 13 3A 
Al41 52 45 50 
Al44 4C 41 43 
A147 45 00 
A149 IE 15 42 
AlAC 3A 42 41 
A14F 43 4B 00 
A152 
A152 00 
A1 53 
Al 53 
A153 

A153 CD D7 Al 
A 1 56 E5 
A 157 32 4F A2 


49 LD 

50 LD 

51 LD 

52 JUSSHIN 

53 CP 

54 JR 

55 INC 

56 SUB 

57 JR 

58 ROUNDHYOJI 

59 LD 

60 CALL 

61 ADD 

62 CALL 

63 LD 

64 CALL 

65 CALL 

66 LD 

67 ADD 

68 CALL 

69 

70 

71 XOR 

72 LD 

7 3 LD 

74 LD 

75 LD 

76 LD 

77 LOOP2 

78 ADD 

79 DJNZ 

80 

81 LD 

82 LD 

83 CALL 

84 LD 

85 PUT1 

86 LD 

87 CALL 

88 DM " 


B, 0 

C, 10 

D, $30 

10 

C,ROUNDHYOJI 
B 

C 

JUSSHIN 

HL,$0711 
♦ LOC 
A i D 

♦PRINT 
A, $ ID 
♦PRINT 
♦PRINT 
A i B 
A i D 

♦PRINT 


A 

(ISHIKAZU),A 
A,(ROUND I 
B i A 

HLiROUNDDATA-160 
DE,16*10 

HL, DE 
LOOP2 

BC, HL 
HL.SOBOO 
ILOC 
H, 11 


L, 4 

IMPRINT 
■" DB 0 


89 PUT2 

90 


LD A,(BC) 

INC BC 

CALL IPRINT 

IF A="*" THEN PUSH HL LD HL,ISHIKAZU INC (HL) POP 


94 IF A=">" THEN LD A,L LD (XZAHYO),A LD A,H LD (YZA 


100 

101 

102 

103 

104 

105 

106 
107 


109 WALL DM 


INC L 

LD A, L 

IF AO20 THEN JR PUT2 

CALL IMPRINT 

DB ,$0D,0 

INC H 

LD A, H 

IF A<>21 THEN JR PUT1 


A,2 

(HOKO),A 
KEY 


110 

111 ROUND 

112 

113 SCREEN 

114 


4,4 DM "3* fc04" 


10,7 DM "ROUND: " DB 0 


25,6 DM "> TAKER 


DB 25,8 DM "* GOISHI" 


DB 25,10 DM "■ WALL " 


25,12 DM "» STONE " DB i 


25,14 DM "O HOLE " DB i 


DB 26,17,"I",$1F,$1F,$1F,$1F,$1D,"K",S20,0 


122 DB 24,19 DM "J > L R ” DB 0 

123 DB 31,19 DM ":REPLACE" DB 0 


124 DB 30,21 DM ”B:BACK” DB 0 


125 

126 KEYBUF DS 1 

127 

128 

129 KEY 

130 CALL 

131 PUSH 

132 LD 


HYOJI 

HL 

(IKIOI),A 


A1 5A CD C4 IF 
A15D 

A15D CD DO IF 
A160 21 52 Al 
A163 BE 20 02 
A166 18 F5 
Al68 77 
A169 21 9D Al 
A16C 01 07 00 
A16F ED B1 
A171 20 EA 
Al73 79 
A174 FE 05 20 
A177 08 21 DA 
A17A A0 35 El 
A17D C3 38 A0 
A180 FE 06 20 
A183 04 El C3 
Al86 38 A0 
A188 21 A3 Al 
A18B 01 05 00 
A18E ED B1 
A 190 F5 
A191 3A A7 Al 
Al94 B9 20 03 
A197 FI 18 C3 
A19A FI 
A19B 18 0D 
A19D 

A19D 52 42 4A 
A1A0 4B 4C 49 
A1A3 02 01 04 
A1A6 03 
A1A7 
A1A7 00 
A1A8 00 
A1A9 00 
A1AA 
Al AA 
A1AA 

A1AA 32 A7 Al 
AlAD El 
Al AE 

A1AE CD IE 20 
A1B1 CD FI IF 
A1B4 CD 00 A2 
A1B7 

A1B7 DD 21 CD 
A1BA Al 
AIBB 11 02 00 
Al BE 
A1BE 3D 
A1BF 28 04 
A1C1 DD 19 
A1C3 18 F9 
A1C5 

A1C5 DD 5E 00 
A1C8 DD 56 01 
AlCB D5 
A1CC C9 
A1CD 

A1CD 39 A2 53 
A1D0 Al 50 A2 
A1D3 63 A2 38 
A1D6 A0 
A1D7 
AID? 

A1D7 

A1D7 3A A8 Al 
AIDA 6F 
A1DB 3A A9 Al 
AIDE 67 
A1DF CD IE 20 
A1E2 3A A7 Al 
A1E5 FE 01 20 
A1E8 02 3E 41 
A1EB FE 02 20 
A1EE 02 3E 3E 
A1F1 FE 03 20 
A1F4 02 3E 56 
A1F7 FE 04 20 
A1FA 02 3E 3C 
AlFD C3 F4 IF 
A200 
A200 
A2O0 

A200 3A A7 Al 
A203 FE 01 20 
A206 01 25 
A208 FE 02 20 
A20B 01 2C 
A20D FE 03 20 
A210 01 24 
A212 FE 04 20 
A215 01 2D 
A217 

A217 CD IB 20 

A21A FE 7B 20 

A21D 03 3E 02 

A220 C9 

A221 FE 2A 20 

A224 03 3E 03 

A227 C9 

A228 FE 40 20 

A22B 03 3E 04 

A22E C9 

A22F FE 4F 20 

A232 03 3E 05 

A235 C9 

A236 3E 01 C9 

A239 

A239 

A239 

A239 

A239 7D 32 A8 
A23C Al 
A23D 7C 32 A9 
A240 Al 
A241 3E FF 
A243 32 4F A2 
A246 CD D7 Al 
A249 CD C4 IF 
A24C C3 AE Al 
A24F 
A24F 00 
A250 
A250 
A250 • 

A250 7D 32 AS 
A253 Al 
A254 7C 32 A9 
A257 Al 
A258 21 62 A2 
A25B 35 
A25C CA 9C A2 


► mry h ^i*o mm***?-am i tza? v&vmm 

*>&< 7 h {>'£< X-tb'Xik^Vli'to *WP1 (27) 


133 

134 KEY2 

135 

136 

137 


CALL fBELL 

CALL fGETKY 

LD HL,KEYBUF 

IF A=(HL) THEN JR KEY2 


138 

139 

140 

141 

142 

143 

144 


LD (HL),A 

LD HL,KEYDATAl 

LD BC, 7 

CPIR 

JR NZ.KEY2 

LD A,C 

IF A=5 THEN LD HL,ROUND DEC (HL) POP HL JP NAKAMI 


145 IF A=6 THEN POP HL JP NAKAMI 


146 LD 

147 LD 

148 CPIR 

149 PUSH 

150 LD 

151 IF A=C 

152 POP 

153 JR 

154 

155 KEYDATAl 

156 KEYDATA2 


HL, KEYDATA2 
BC, 5 

AF 

A,(HOKO) 

THEN POP AF:JR KEY2 
AF 

MAIN 

DM "RBJKLI" 

DB 2,1,4,3 


157 

158 HOKO DS 1 

159 XZAHYO DS 1 

160 YZAHYO DS 1 

161 
162 

163 MAIN 

164 

165 

166 MAIN2 

167 

168 

169 

170 

171 LD IX.JPTBL 


LD (HOKO),A 

POP HL 

CALL #LOC 

CALL #PRINTS 

CALL MOVE 


172 LD 

173 ADDJP 

174 DEC 

175 JR 

176 ADD 

177 JR 

178 JUMP 

179 LD 

180 LD 

181 PUSH 

182 RET 

183 JPTBL 

184 DEFW 


DE, 2 
A 

Z,JUMP 
IX,DE 
ADDJP 

E,(IX) 

D,(1X+1) 
DE 


SPACE,KEY,GOISHI,ISHI.NAKAMI 


185 

186 

187 HYOJI 


190 

191 

192 

193 

194 

195 

196 

197 

199 MOVE 

200 
201 

202 

203 

204 


205 

206 
207 


LD A,(XZAHYO):LD L,A 

LD A,(YZAHYO):LD H,A 

CALL #LOC 

LD A,(HOKO) 

IF A=1 THEN LD A,"A" 

IF A=2 THEN LD A,”>" 

IF A=3 THEN LD A,”V" 

IF A=4 THEN LD A,*'<" 

JP IPRINT 


IF A=2 THEN INC L 
IF A=3 THEN INC H 
IF A=4 THEN DEC L 


CALL ISCRN 

IF A=THEN LD A,2:RET 


208 

209 

210 


IF A="»" THEN LD A,3:RET 
IF A="«" THEN LD A,4:RET 
IF A="0" THEN LD A,5:RET 
LD A,1:RET 


211 
212 

213 

214 

215 SPACE 

216 LD A,L:LD (XZAHYO) 


217 LD A,H:LD (YZAHYO),A 


218 

219 

220 
221 
222 

223 

224 IKIOI 

225 

226 

227 GOISHI 

228 


LD A,SFF 

LD (IKIOI),A 

CALL HYOJI 

CALL fBELL 

JP MAIN2 

DS 1 


LD A,L:LD (XZAHYO),A 


229 LD A,H:LD (YZAHYO),A 


230 

231 

232 


LD HL,ISHIKAZU 

DEC (HL) 

JP Z,CLEAR 




113 



A25F C3 53 Al 

A262 

A262 00 

A263 

A263 

A263 

A263 3A 4F A2 
A266 3C 20 03 
A269 C3 53 Al 
A26C E5 
A26D CD 00 A2 
A270 FE 01 20 
A273 02 18 0A 
A276 FE 05 20 
A279 02 18 18 
A27C El 
A27D C3 53 Al 
A280 
A280 

A280 CD IE 20 

A283 3E 40 

A285 CD F4 IF 

A288 

A288 El 

A289 7D 32 A8 

A28C Al 

A28D 7C 32 A9 

A290 Al 

A291 C3 53 Al 

A294 

A294 

A294 CD IE 20 

A297 CD FI IF 

A29A 18 EC 

A29C 

A29C 

A29C 

A29C 

A29C 3A DA A0 
A29F FE 14 20 
A2A2 02 18 07 
A2A5 3C 
A2A6 32 DA A0 
A2A9 C3 38 A0 


233 JP KEY 

235 ISH1KAZU DS 1 

236 

237 

238 ISHI 

239 LD A,(IK101) 

240 IF 1NC(A)=0 THEN JP KEY 


241 

242 

243 

244 


PUSH HL 
CALL MOVE 

IF A=l THEN JR MOVESTONK 
IF A=5 THEN JR FALL 


245 

246 

247 

248 MOVESTONE 

249 

250 

251 

252 IDOU 

253 

254 


POP 

JP 


LD 


*LOC 
A, "@" 
♦PRINT 


POP HL 

LD A ,L:LD (XZAHYO),A 


255 LD A,H:LD (YZAHYO),A 


256 

257 

258 FALL 

259 

260 
261 
262 

263 

264 

265 CLEAR 

266 
267 


JP KEY 


CALL #LOC 

CALL #PRINTS 

JR IDOU 


LD A,(ROUND) 

IF A=20 THEN JR ALLCLEAR 


268 INC A 

269 LD (ROUND),A 

270 JP NAKAMI 


A2AC 

A2AC 3E 0C 
A2AE CD F4 IF 
A2B1 CD E2 IF 
A2B4 20 2A 2A 
A2B7 2A 2A 2A 
A2BA 2A 2A 2A 
A2BD 2A 2A 2A 
A2C0 2A 2A 2A 
A2C3 2A 2A 2A 
A2C6 2A 2A 0D 
A2C9 20 2A 20 
A2CC 20 20 20 
A2CF 20 20 20 
A2D2 20 20 20 
A2D5 20 20 20 
A2D8 20 20 20 
A2I)B 20 2A 01) 
A2DE 20 2A 20 
A2E1 43 4F 4E 
A2E4 47 52 41 
A2E7 54 55 4C 
A2EA 41 54 49 
A2ED 4F 4E 53 
A2F0 20 2A 0D 
A2F3 20 2A 20 
A2F6 20 20 20 
A2F9 20 20 20 
A2FC 20 20 20 
A2FF 20 20 20 
A302 20 20 20 
A305 20 2A 0D 
A308 20 2A 2A 
A30B 2A 2A 2A 
A30E 2A 2A 2A 
A3 11 2A 2A 2A 
A314 2A 2A 2A 
A317 2A 2A 2A 
A31A 2A 2A 0D 
A3 1D 00 
A3 IE C9 
A3 IF 
A3 1 F 


271 ALLCLEAR 

272 LD A,$0C 

273 CALL *PRINT 

274 CALL #MPRINT 

275 DM " *»»****************" DB $0D 


276 DM 


DB SOD 


277 DM " * CONGRATULATIONS *” DB SOD 


278 DM 


' DB S0D 


279 DM ” ********»*»********" DB SOD,00 


280 RET 

281 
282 


') * h 





283 

ROUNDDATA 

284 

DM 

285 

DM 

286 

DM 

287 

DM 

288 

DM 

289 

DM 

290 

DM 

291 

DM 

292 

DM 

293 

DM 

29 4 


295 

DM 

296 

DM 

297 

DM 

298 

DM 

299 

DM 

300 

DM 

301 

DM 

302 

DM 

303 

DM 

304 

DM 

305 


306 

DM 

307 

DM 

308 

DM 

309 

DM 

310 

DM 

311 

DM 

312 

DM 

313 

DM 

314 

DM 

315 

DM 

316 


317 

DM 

318 

DM 

319 

DM 

320 

DM 

321 

DM 

322 

DM 

323 

DM 

324 

DM 

325 

DM 

326 

DM 

327 


328 

DM 

329 

DM 

330 

DM 

331 

DM 

332 

DM 

333 

DM 

334 

DM 

335 

DM 

336 

DM 

337 

DM 

338 


339 

DM 

340 

DM 

341 

DM 

342 

DM 

343 

DM 

344 

DM 

345 

DM 

346 

DM 

347 

DM 

348 

DM 

349 


350 


351 

DM 

352 

DM 

353 

DM 

354 

DM 

355 

DM 

356 

DM 


>********** 


* * 
* * 

♦ * 

* * 

********* 
> * * 


"****************" 
"****************" 
" ®@@« @«@@@ @@@@" 
" @@@@ @@@* *@@@" 
" 9999 @* *@@@@" 

" @ «@e@o *@@@@>” 

" @@@ @@@@ @@«@ " 
"@@@@@ @@@@@@@ 
"****************•• 
"****************" 


" > **** 

**** 

” * * * * 

" * * * * 

•• * * * * 



*■* 

*b* 

*■* 


*** 

* * 
* * 
******* 
* * 



"0 o" 

•• o**o**o 

’• * * * 

H * * * 

" o**o**o 

" *>@* * 


357 

DM " 

* * * 

" 

431 

DM 

" > 9 

358 

DM " 

0**0**0 


4 32 

DM 

" 9 9 9 9 9 9 9 9" 

359 

DM " 



433 

DM 

" 9 9 9 9 9 9 9 9" 

360 

DM "0 


0" 

434 

DM 

"99999999" 

361 




435 

DM 

"99999999" 

362 

DM ” 



436 

DM 

"99999999" 

363 

DM " 

* 

M 

437 

DM 

"99999999" 

364 

DM " 

***** 

M 

438 



365 

DM " 

******* 


439 

DM 

"OOOOOOOOOOOOOOOO" 

366 

DM ’•> 

********* 

440 

DM 

"0>@ 0" 

367 

DM " 

********* 

44 1 

DM 

"0 0" 

368 

DM " 



442 

DM 

"0 ***** 0" 

369 

DM " 

mmmmm 


443 

DM 

"0 * * 0" 

370 

DM " 



444 

DM 

"0 * * 0" 

371 

DM " 



445 

DM 

"0 **** 0" 

372 




446 

DM 

"0 * 0" 

373 

DM " 



447 

DM 

"0 0" 

374 

DM "> 

* 


448 

DM 

"OOOOOOOOOOOOOOOO" 

375 

DM " 

* 

M 

449 



376 

DM " 

****** 

M 

450 

DM 

■ * 

377 

DM " 

* * 

M 

451 

DM 

• ■ oo b*o " 

378 

DM " 

* * 

w 

452 

DM 

"B * ■ 

379 

DM " 

* * 


453 

DM 

'• * ■ " 

380 

DM '* 

* * * 


454 

DM 

> * 0 * ■" 

381 

DM '• 

** *** 

M 

455 

DM 

" 0 0 0 " 

382 

DM " 


f# 

456 

DM 

"0 * * * 

383 




457 

DM 

" * * o* 

384 

DM "> 


M 

458 

DM 

■ * 

385 

DM " 



459 

DM 

OB ■ " 

386 

DM "@@®«@@e 

) ©’• 

460 



387 

DM @ 

@ @ » e e 

e w 

461 

DM 

" 9 9 * " 

388 

DM "OOOOOOOOOOOOOOOO” 

462 

DM 

" *BBB 

389 

DM "OOOOOOOOOOOOOOOO" 

463 

DM 


390 

DM "OOOOOOOOOOOOOOOO" 

464 

DM 

B ■ 

391 

DM "OOOOOOOOOOOOOOOO" 

465 

DM 

B *■ 9 

392 

DM "OOOOOOOOOOOOOOOO" 

466 

DM 

B 

393 

DM "****************" 

467 

DM 

B MB 

394 




468 

DM 

" BB B 9 > 

395 

DM "OOOOOOOOOOOOOOOO" 

469 

DM 

"o mm 

396 

DM "0>@ 


0" 

470 

DM 

" * * 9 9" 

397 

DM "0 


0" 

471 



398 

DM "0 

* 

0" 

472 

DM 

"0 0" 

399 

DM "0 

* ** 

0" 

473 

DM 

'• " 

400 

DM "0 

* * 

0" 

474 

DM 

" o***oo»***** " 

401 

DM "0 

* * * 

0" 

475 

DM 

" 0*0* ** *0* *0* 

402 

DM "0 

* * * 

0" 

476 

DM 

" 0* * * * * *0* * * * 

403 

DM "0 

* * 

0" 

477 

DM 

" *****0**** 00 " 

404 

DM "OOOOOOOOOOOOOOOO" 

478 

DM 

" ***********0 

405 




479 

DM 

" >**00**0***0 " 

406 

DM "OOOOOOOOOOOOOOOO" 

480 

DM 


407 

DM "0 


0" 

481 

DM 

"0 0" 

408 

DM "0 

9999999 

0" 

482 



4 09 

DM "0 

® @ 

0" 

483 

DM 

" ■ 

410 

DM "0 

@ *o> w 

0" 

484 

DM 

II, II 

411 

DM "0 

@ 9 

0" 

485 

DM 

" ■ @ 00000 9 " 

412 

DM "0 

9999999 

0" 

486 

DM 

"B 9 OOOOO 9 

413 

DM "0 


0" 

487 

DM 

" @00*00® 

414 

DM "0 


0" 

488 

DM 

" 9 OOOOO 9 

415 

DM "OOOOOOOOOOOOOOOO" 

489 

DM 

" 9 OOOOO 9 " 

416 




490 

DM 


417 

DM "0@0@0@0@0«0@0@0«" 

491 

DM 

V 

4 18 

DM "©0«0@0®0@0®0@0@0" 

492 

DM 

.. >- 

419 

DM "0«0@0@0«0@0@0*0®" 

493 



4 20 

DM "«0®0@0*0«0@0@0@0" 

494 

DM 

" OB 0 0 0 " 

421 

dm "o@o*o@o@o@o«o@o@" 

495 

DM 

OB**" 

422 

dm "@o@o@o@o*o@o«o@o” 

496 

DM 

"B O @* 0 9" 

423 

DM "0*0«0@0@0«0@0@0@" 

497 

DM 

" @0* * 9 ®*@00 " 

424 

DM "«O»0«OWO@O@0*0»0" 

498 

DM 

" o e* > *** 

425 

DM "0@0«0«0*0®0@0@0@" 

499 

DM 

"0*9 0 @0" 

426 

DM "«0@0@0@0@0@0@0@>" 

500 

DM 

" *@oeoB @ « ** " 

427 




501 

DM 

" O 0 * B " 

428 

dm "« @*« @*@ @*@ 

«*" 

502 

DM 

" 0 @* ®*0 

429 

dm "a ® 

9 9 9 9 9 

9 " 

503 

DM 

" 0 0 O 9" 

4 30 

DM "@ 9 

9 9 9 9 9 

9 V 
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R 1 rtgu^l— 


ABOOh 

KPINIT 

magic, saaxmzmmktz 

AB03h 

KPRINT 

1 DEU'7X7X>ffl%-JIS3- Y tfrtikm.TF?* 

AB06h 

KMPRNT 

mi£<n7 KUx 7b'b (77Xf:JU 5:*StS. I> Ka- KliOOOOn 

AB09h 

KSPRNT 

DETxfS ft57 Kbzmxtfl5-*st5„ x> K3 - KIJOOOOh 

ABOCh 

KLTNL 

3fe4tt?> 

ABOFh 

KPCLS 

0 rti 

ABI2h 

STSCRN 

SCREENS. AI/'/Z X <7)7U —jit; 

ABI5h 

SETWIN 

WINDOWKSo *M<7)7-X5IJ4MAGICCiit 

ABI8 h 

SETPAL 

PALET^So *«(7)7'-X5IJ4MAGICICi«r 

ABIBii 

STSIZE 

Dlx-XXXCY, E C- -7X 7 C X <77 K X b 4&$-4 b3£ 

ABIEh 

STPICH 

LtFBy5-4l*:1-2>. A U-7 X 7 <77 Ji4i 4 t'x MC Y, TI44 fx H:X(7)« 

AB2Ih 

SETDIR 

»(n/l6)$-4g$t4>o STSIZE 8 iE®t 5 
«*#/*»# S-ftSt*. a = 0 :«t. a = 0 : m 

AB24ii 

SETLOC 

®^(7)X KL-XXDSW^'ibR^teSiStyigSt?) (Ex.DW X. Y) 

AB27h 

AB2Ah 


} Uf-7 













4 


HE SENTINEL 




AB00 

C3 

2D 

AB 

C3 

8D 

AB 

C3 

B2 

OB 

AC60 

E5 

DD 

21 

9C 

AE 

CD 

04 

B0 : 

AE 

ADA8 

23 

79 

E6 

0F 

16 

00 

5F 

3A 

40 

AB08 

AB 

C3 

BA 

AB 

C3 

Cl 

AB 

C3 

C5 

AC68 

El 

DD 

El 

D1 

Cl 

E5 

C9 

ED : 

CC 

ADB0 

DB 

AE 

CD 

7A 

AE 

CD 

69 

AE 

62 

AB 1 0 

E3 

AB 

C3 

1C 

AC 

C3 

50 

AC 

D8 

AC 70 

53 

DA 

AE 

C9 

32 

DC 

AE 

C9 : 

29 

ADB8 

E5 

2A 

E0 

AE 

19 

EB 

El 

73 

F5 

AB 1 8 

C3 

3 1 

AC 

C3 

6F 

AC 

C3 

74 

B5 

AC78 

32 

DD 

AE 

C9 

El 

D5 

5E 

23 : 

BD 

ADC0 

23 

72 

23 

C9 

EB 

11 

21 

21 

BF 

A B 2 0 

AC 

C3 

78 

AC 

C3 

7C 

AC 

C3 

4 1 











ADC8 

B7 

ED 

52 

3E 

5D 

95 

D8 

3E 

3C 

AB28 

90 

AC 

C3 

90 

AC 

C5 

D5 

E5 

BA 

SUM: 

C0 

13 

45 

A0 

41 

51 

CF 

5E BE 18 

ADD0 

2E 

94 

D8 

16 

00 

5C 

3E 

5E 

A8 

AR30 

DD 

E5 

CD 

24 

20 

32 

94 

AE 

47 











ADD8 

CD 

7A 

AE 

7D 

CD 

8F 

AE 

7B 

F7 

AB38 

3E 

04 

1 1 

C8 

AE 

CD 

A3 

IF 

58 

AC80 

56 

23 

ED 

53 

DE 

AE 

5E 

23 

C6 

ADE0 

E6 

03 

87 

87 

87 

87 

87 

87 

13 

AB4 0 

CD 

09 

20 

38 

39 

21 

00 

00 

88 

AC88 

56 

23 

ED 

53 

E0 

AE 

D 1 

E5 

FD 

ADE8 

06 

00 

4 F 

CB 

3A 

CB 

IB 

CB 

0B 

AB4 8 

22 

DE 

AE 

22 

E0 

AE 

21 

20 

9F 

AC90 

C9 

C5 

D5 

E5 

CD 

16 

AE 

38 

11 

ADF0 

3A 

CB 

IB 

3E 

20 

CD 

8F 

AE 

88 

AB50 

10 

22 

DA 

AE 

AF 

32 

DC 

AE 

25 

AC98 

21 

2A 

E2 

AE 

22 

95 

AE 

32 

72 

ADF8 

B7 

C9 

38 

0E 

3A 

99 

AE 

A9 

F0 

AB58 

32 

DD 

AE 

2A 

E4 

AE 

1 1 

0B 

95 

ACA0 

5D 

IF 

CD 

ID 

AE 

38 

13 

DD 

3C 











AB60 

00 

ED 

52 

22 

97 

AE 

CD 

00 

73 

ACA8 

56 

01 

DD 

5E 

00 

DD 

23 

DD 

6F 

SUM: 

04 

BF 

9C 

81 

99 

40 

AC 

31 718A 

AB68 

AF 

21 

B2 

AE 

1 1 

9C 

AE 

01 

8C 

ACB0 

23 

7 A 

B3 

28 

16 

CD 

D3 

AC 

DA 











AB70 

16 

00 

ED 

B0 

DD 

21 

9C 

AE 

FB 

ACB8 

18 

E8 

DD 

56 

01 

DD 

5E 

00 

6F 

AE00 

20 

08 

E5 

2A 

9 A 

AE 

34 

El 

94 

AB78 

CD 

04 

B0 

B7 

18 

09 

F5 

AF 

FD 

ACC0 

DD 

23 

DD 

23 

7A 

B3 

20 

F2 

3F 

AE08 

AF 

C9 

AF 

77 

23 

3E 

02 

77 

78 











ACC8 

37 

l 8 

04 

CD 

50 

AE 

B7 

El 

B6 

AE10 

22 

9A 

AE 

23 

B7 

C9 

3A 

94 

DB 

SUM: 

2E 

1C 

E4 

DE 

FI 

3E 

53 

41 164B 

ACD0 

D1 

Cl 

C9 

CD 

C4 

AD 

38 

3C 

0D 

AE 1 8 

AE 

B7 

C0 

37 

C9 

ED 

4B 

DE 

3B 











ACD8 

2A 

64 

IF 

3E 

01 

CD 

00 

20 

D9 

AE20 

AE 

2A 

Al 

AE 

B7 

ED 

42 

D8 

E5 

AB80 

32 

94 

AE 

CD 

C4 

IF 

FI 

DD 

F2 

ACE0 

09 

DD 

E5 

E5 

DD 

El 

DD 

7E 

C9 

AE28 

2A 

9D 

AE 

B7 

ED 

42 

28 

02 

85 

AB88 

El 

El 

D1 

Cl 

C9 

C5 

D5 

E5 

9C 

ACE8 

00 

DD 

23 

B7 

28 

24 

2A 

95 

C2 

AE30 

3F 

D8 

ED 

4B 

E0 

AE 

2A 

A3 

AA 

AB90 

DD 

E5 

CD 

16 

AE 

38 

15 

CD 

6D 

ACF0 

AE 

47 

37 

DD 

4E 

01 

CD 

FA 

IF 

AE38 

AE 

B7 

ED 

42 

D8 

2A 

9F 

AE 

E3 

AB98 

ID 

AE 

38 

10 

32 

5D 

IF 

2A 

EB 

ACF8 

AD 

C4 

8A 

AD 

DD 

4E 

00 

79 

4C 

AE40 

B7 

ED 

42 

C8 

3F 

C9 

ED 

5B 

FE 

ABAC 

E2 

AE 

22 

95 

AE 

CD 

D3 

AC 

41 











AE48 

97 

AE 

EB 

B7 

ED 

52 

EB 

D0 

El 

ABA8 

CD 

50 

AE 

B7 

DD 

El 

El 

D1 

F2 

SUM: 

F7 

DC 

5D 

53 

31 

F5 

D5 

8D A792 

AE50 

2A 

95 

AE 

36 

0F 

2A 

E2 

AE 

6C 

ABB0 

Cl 

C9 

DD 

El 

CD 

91 

AC 

DD 

2F 











AE58 

22 

95 

AE 

E5 

DD 

E5 

E5 

DD 

CE 

ABBS 

E5 

C9 

D5 

DD 

El 

CD 

91 

AC 

4B 

AD00 

32 

99 

AE 

CD 

8A 

AD 

DD 

23 

: 7D 

AE60 

El 

CD 

04 

B0 

DD 

El 

El 

37 

38 

ABC0 

C9 

D5 

E5 

3A 

DD 

AE 

E6 

01 

2F 

AD08 

DD 

23 

22 

95 

AE 

CD 

46 

AE 

: 26 

AE68 

C9 

CB 

3A 

CB 

IB 

CB 

3A 

CB 

84 

ABC8 

20 

0C 

11 

80 

02 

ED 

53 

DE 

DD 

AD 1 0 

10 

El 

DD 

El 

3A 

DD 

AE 

E6 

: 5a 

AE70 

IB 

CB 

3A 

CB 

IB 

CB 

3A 

CB 

D6 

ABD0 

AE 

CD 

14 

AD 

18 

0A 

11 

C8 

37 

AD 18 

01 

20 

12 

B7 

CD 

3F 

AD 

CD 

: 70 

AE78 

IB 

C9 

E5 

21 

00 

00 

B7 

28 

C9 

ABD8 

00 

ED 

53 

E0 

AE 

CD 

14 

AD 

5C 

AD20 

ID 

AE 

D0 

2 1 

00 

00 

22 

DE 

: BC 











ABE0 

El 

D1 

C9 

C5 

D5 

E5 

DD 

E5 

BC 

AD 2 8 

AE 

CD 

67 

AD 

C9 

CD 

67 

AD 

: 39 

SUM: 

DE 

69 

11 

EE 

C4 

4 A 

99 

A0 3499 

ABE8 

DD 

21 

1A 

AC 

CD 

04 

B0 

2A 

6F 

AD30 

CD 

ID 

AE 

D0 

21 

00 

00 

22 

: AB 











ABF0 

9F 

AE 

22 

E0 

AE 

3A 

DD 

AE 

C2 

AD38 

E0 

AE 

37 

CD 

3F 

AD 

C9 

F5 

: 3C 

AE80 

0B 

CB 

3F 

30 

01 

19 

CB 

23 

4D 

ABF8 

E6 

01 

20 

08 

2A 

9D 

AE 

22 

A6 

AD40 

2A 

DE 

AE 

3A 

DA 

AE 

16 

00 

: 8E 

AE88 

CB 

12 

18 

F2 

EB 

El 

C9 

83 

FF 











AD48 

5F 

3 A 

DC 

AE 

E6 

0F 

CD 

7A 

: 5F 

AE90 

5F 

D0 

14 

C9 

00 

00 

00 

00 

0C 

SUM: 

3C 

D4 

88 

5E 

C5 

B7 

61 

F2 DF4A 

AD50 

AE 

CD 

69 

AE 

3A 

DA 

AE 

CD 

: 21 

AE98 

00 

00 

00 

00 

00 

00 

00 

00 

00 











AD58 

8F 

AE 

FI 

38 

03 

19 

18 

03 

: 9D 

AEA0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

AC00 

DE 

AE 

18 

10 

2A 

A1 

AE 

3 A 

67 

AD60 

B7 

ED 

52 

22 

DE 

AE 

C9 

2A 

: 97 

AEA8 

00 

00 

00 

00 

0 0 

00 

00 

00 

00 

AC 08 

DA 

AE 

3D 

06 

00 

4F 

B7 

ED 

BE 

AD68 

E0 

AE 

3A 

DB 

AE 

16 

00 

5F 

: C6 

AEB0 

00 

00 

06 

00 

00 

00 

00 

7F 

85 

AC 10 

42 

22 

DE 

AE 

DD 

El 

El 

D1 

60 

AD70 

3A 

DC 

AE 

E6 

F0 

0F 

0F 

0F 

: C7 

AEB8 

02 

C7 

00 

0A 

00 

07 

00 

07 

El 

AC 18 

Cl 

C9 

09 

0F 

C5 

D5 

E5 

DD 

FE 

AD78 

0F 

CD 

7A 

AE 

CD 

69 

AE 

3A 

: 22 

AEC0 

00 

07 

00 

07 

07 

02 

00 

0F 

26 

AC20 

E5 

DD 

21 

9C 

AE 

DD 

77 

14 

95 











AEC8 

4B 

53 

54 

20 

20 

20 

2 0 

20 

92 

AC28 

CD 

04 

BO 

DD 

El 

El 

D1 

Cl 

B2 

SUM: 

3E 

DA 

73 

C4 

AE 

FC 

FF 

42 B759 

AED0 

20 

20 

20 

20 

20 

2E 

44 

49 

5B 

AC30 

C9 

El 

C5 

D5 

DD 

E5 

11 

A6 

BD 











AED8 

43 

00 

20 

10 

00 

00 

00 

00 

73 

AC38 

AE 

06 

08 

7E 

23 

12 

13 

10 

92 

AD80 

DB 

AE 

CD 

8F 

AE 

19 

22 

E0 

: AE 

AEE0 

00 

00 

00 

A0 

FF 

AA 



49 

AC40 

FA 

E5 

DD 

21 

9C 

AE 

CD 

04 

F8 

AD88 

AE 

C9 

16 

00 

59 

CB 

3B 

CB 

: B7 











AC 4 8 

B0 

El 

DD 

El 

D1 

Cl 

E5 

C9 

8F 

AD90 

3B 

CB 

3B 

CB 

3B 

3A 

DA 

AE 

: 09 

SUM: 

E5 

EE 

05 

EC 

32 

FB 

F8 

A4 0E23 

AC50 

El 

C5 

D5 

DD 

E5 

11 

9D 

AE 

99 

AD98 

CD 

7A 

AE 

CD 

69 

AE 

E5 

2A 

: E8 











AC58 

06 

08 

7E 

23 

12 

13 

10 

FA 

DE 

ADA0 

DE 

AE 

19 

EB 

El 

73 

23 

72 

: 79 












i)Xb2 U*h3 


3000 

18 

IB 

1A 

B7 

28 

17 

CD 

E3 

F3 

3098 

00 

CD 

21 

20 

CD 

F4 

IF 

CD 

BB 











3008 

30 

32 

IE 

31 

CD 

07 

31 

C2 

78 

30AO 

EE 

IF 

D6 

59 

B7 

C0 

3E 

50 

41 











3010 

18 

31 

CD 

E3 

30 

32 

IF 

31 

AB 

30A8 

01 

10 

00 

11 

00 

00 

21 

20 

63 











3018 

CD 

07 

31 

18 

54 

CD 

E2 

IF 

3F 

30BO 

31 

F5 

3A 

IE 

31 

32 

5D 

IF 

5D 











3020 

53 

4F 

55 

52 

43 

45 

20 

20 

11 

30B8 

79 

CD 

00 

20 

38 

5E 

3A 

IF 

55 

8000 

CD 

00 

AB 

D8 

CD 

15 

AB 

00 

DD 

3028 

20 

20 

20 

20 

44 

45 

56 

49 

A8 

30C0 

31 

32 

5D 

IF 

79 

CD 

03 

20 

48 

8008 

00 

00 

00 

7F 

02 

BF 

00 

11 

51 

3030 

43 

45 

20 

3D 

3D 

3E 

20 

00 

80 

30C8 

38 

52 

EB 

09 

EB 

FI 

3D 

20 

B7 

8010 

20 

10 

CD 

IB 

AB 

3E 

01 

CD 

CF 

3038 

CD 

21 

20 

32 

IE 

31 

CD 

F4 

50 

30D0 

E0 

CD 

E2 

IF 

43 

6F 

6D 

70 

3D 

8018 

21 

AB 

3E 

05 

CD 

IE 

AB 

CD 

72 

3040 

IF 

CD 

EE 

IF 

CD 

E8 

30 

CD 

AB 

30D8 

6C 

65 

74 

65 

64 

20 

21 

0D 

5C 

8020 

0F 

AB 

DD 

21 

40 

80 

DD 

56 

AB 

3048 

E2 

IF 

44 

45 

53 

54 

49 

4E 

C8 

30E0 

00 

B7 

C9 

CD 

10 

31 

1A 

13 

BB 

8028 

01 

DD 

5E 

00 

7A 

B3 

C8 

DD 

0E 

3050 

41 

54 

49 

4F 

4E 

20 

44 

45 

24 

30E8 

FE 

41 

C8 

FE 

42 

C8 

FE 

43 

50 

8030 

46 

02 

CD 

03 

AB 

13 

10 

FA 

E0 

3058 

56 

49 

43 

45 

20 

3D 

3D 

3E 

FF 

30F0 

C8 

FE 

44 

C8 

FE 

45 

20 

0B 

40 

8038 

DD 

23 

DD 

23 

DD 

23 

18 

E6 

FE 

3060 

20 

00 

CD 

21 

20 

32 

IF 

31 

B0 

30F8 

F5 

3A 

FF 

20 

FE 

50 

20 

02 

BE 

8040 

21 

24 

53 

21 

30 

5E 

21 

31 

99 

3068 

CD 

F4 

IF 

CD 

EE 

IF 

CD 

E8 

6F 











8048 

03 

00 

00 






03 

3070 

30 

3A 

IE 

31 

CD 

F4 

IF 

CD 

66 

SUM: 

50 

25 

55 

A7 

81 

8F 

0E 

FA C57A 











3078 

E2 

IF 

3A 

20 

3D 

3D 

3E 

20 

33 











SUM: 

65 

8C 

EE 

DF 

B9 

F7 

45 

EF 5762 











3100 

FI 

C9 

FI 

D1 

C3 

18 

31 

1A : 

: A2 











SUM: 

47 

30 

ED 

FB 

01 

31 

A5 

F6 C7EC 

3108 

13 

FE 

3A 

C8 

D1 

C3 

18 

31 : 

: F0 





















3110 

1A 

13 

FE 

20 

28 

FA 

IB 

C9 : 

: 51 











3080 

00 

3A 

IF 

31 

CD 

F4 

IF 

CD : 

: 37 

3118 

3E 

03 

37 

C9 

Cl 

C9 

00 

00 : 

: CB 











3088 

E2 

IF 

3A 

20 

20 

53 

75 

72 : 

B5 





















3090 

65 

28 

59 

2F 

4E 

29 

3F 

20 : 

EB 

SUM: 

5C 

DD 

60 

82 

7D 

9E 

64 

14 8A50 












') X h 4 



100 ’ create KST file 1987/03/13 by K.MORI 

110 * 

120 limit itHADFF ’ AE00-AEFF = RECORD BUFFER 
130 • 

140 fSETDISKj 
150 repeat 

160 print "FORMATTED NEW DISK DRIVE ":D=flash:print chr$(D);":"/ 
170 print "Ready(Y/N)?":A=flash:print chr$(A)/ 

180 until A=89 
190 » 

200 r DIRINITj 

210 devi D.&HAE00,16,1 

220 if peek(&HAE00)< > 255 then beep tprint "THIS IS USED DISK."/:end 


230 poke &HAE0O,4:mem &HAE01,"KST 
240 poke &HAEID,0,2,0 
250 devo D.4HAE00,16,1 
260 ’ 

270 'FATINITj 

280 devi D.&HAE00,14,1 

290 for 1=2 to &H46 

300 poke &HAK00+I,1+1 

310 next :poke &HAE47.&H8F 

320 devo D,&HAE00,14,1 

330 * 

340 r DATAINITj 
350 for 1=0 to 127 


DIC " 


JACKWRITE 


117 
























360 wpoke &HAE00+I*2,0 

370 next 

380 for 1=32 to 1135 

390 print "RECORD ";I:print 

400 devo D,&HAE00,1,1 

410 next 

420 1 

430 print "COMPLETEDend 


• BASICS i <y 


100:96 

180:74 

260:27 

340:06 

420:27 


110:27 
190:27 
270:C7 
350:51 
430:A8 


120:C3 
200:CB 
280:7C 
360:26 


130:27 
210:7E 
290:91 
370:83 


140:CF 
220:CE 
300:3E 
380:B6 


150:84 
230:32 
310:D9 
390:0D 


160:82 
240:24 
320:7D 
400:61 


V * h 5 


10 ' KANJI INPUT EDITOR 1987/05/03 by K.MOR1 
20 ’ 

30 limit &H9FFF:graph lrwindow (0,0 )-(639,199) 

40 color l,l:palet 0,1,2,3,4,5,6,7:cls:WID=80:width WID 
50 print t.ab( WI D/2 ) ; " * KANJI EDITOR *"// 

60 print tab(WID/2);"KST DISK DRIVE = " 

70 D=flash:if D<&H41 or D>&H45 goto 70 
80 print chrilDl;":"/ 

90 » 

100 repeat 

110 locate WID/2,4:print "JIS": gosub r INPUTj 

120 if C=0 then cls2:end: else clsl 

130 gosub '•DOTSETj :X=0:Y=0 

140 gosub r RF.ADj 

150 gosub r GCURj 

160 locate WID/2,7:print "LINE NUMBERL/2;" 

170 locate WID/2,9:print "1st POSITION" 

180 repeat:unlil get=0 


330 repeatruntil get=0 

340 locate WID/2+12,7:print L/2 

350 until A=13 or A=27 

360 until A=27:cls2:end 

370 ’ 

380 ’ SUBROUTINE 
390 ’ 


410 
420 
4 30 
440 
450 
460 
470 


500 

510 

520 

530 

540 

550 

560 

570 

580 

590 

600 

610 

620 

630 

640 

650 

660 

670 

680 

690 

700 

710 

720 

730 

740 

750 

760 

770 

780 

790 

800 

810 


r INPUT j 

print " CODE=$":X=curx-1:Y=cury 
locate X,Y:input "";C:if C=0 goto 450 
if C/256>&H4F or mod(C,256)>&H7E goto 420 
if C/256<&H21 or mod(C,256)<&H21 goto 420 
X=0:Y=0 
return 

fDOTSETi 

clsl 

for X=0 to 15 

for Y=0 to 15:dot (X*20,Y*10):next 
next 
return 

r MOVEj 

gosub r GCURj :X=X+V:Y=Y+W 

if X=16 then X=0: else if X=65535 then X=15 
if Y=16 then Y=0: else if Y=65535 then Y=15 
gosub r GCURj 
return 

r GCURj 

if mod(L,2) 
then 

line (R*20,S*10)-(X*20,Y*10) 
else 

line (X*20-6,Y*10)-|X*20+6,Y*10) 
line (X*20,Y*10-3)-(X*20,Y*10+3) 
end i f 

dot (X<2,Y+160) 
return 

fLINEi 

if L=62 then beep : return 

locate WID/2,9:print "2nd": gosub r GCURj 

if mod(L r 2) 

then line (R*20,S*10)-(X*20,Y*10) 

color 3i1:1ine <R*2,S+160)-(X*2,Y+160):color 1,1 
wpoke &HA000+B+L,rotld(rot.ld(rotld(R)+S)+X)+Y 
locate WID/2,9:print "1st" 
end if 



iT-f ^ 


900 

910 

920 

930 

940 

950 

960 

970 

980 


R=X:S=Y:L=L+1: gosub rGCURj 
return 

r DELETEj 

if L=0 then beep : return 
gosub r GCURj 
L=L-1:X=R:Y=S 

locate WID/2,9:print "1st" 
if mod(L,2)=1 

then window (0,160)-(31,175) 
clsl:color 3,1 
for 1=1 to L step 2 
P=wpeek(&HA000+B+I) 

Y=P and 15:X=(P/16) and 15 
S=(P/256) and 15:R=(P/4096) and 15 
if I<L then line (R*2,S+160)-(X*2,Y+160) 
next :wpoke &HA000 + B+1.,0 
color 1,1:window (0,0)-(639,199) 


190 

» 




1000 

line (R*20,S*10)-(X*20,Y*10) 

200 

repeat 



1010 

locate WID/2,9:print "2nd" 

210 

A=i 

inkey 



1020 

end if 

220 

if 

A= " 1" 

then 

V=-l:W=1: gosub r M ovEj 

1030 

gOBub r GCURj 

230 

if 

A = "2" 

’ then 

V=0:W=1: gosub rMOVEj 

1040 

return 

240 

if 

A="3" 

’ then 

V =1:W =1: gosub r MOVEj 

1050 

» 

250 

if 

A="4" 

1 then 

v=-l:W=0: gosub rMOVEi 

1060 

fREADj 

260 

if 

A = "5" 

’ then 

gosub r LINEj 

1070 

N=C-&H2121 

270 

if 

A= ”6" 

then 

V= 1 : W=0: gosub r M 0VEj 

1080 

N=(N/256)*94+mod(N,256 ) 

280 

if 

A= " 7' 

then 

V=-1:W=-1: gosub r M ovEj 

1090 

B=raod(N,4)*64:N=N/4+32 

290 

if 

A="8" 

then 

V=0:W=-1: gosub r M0 VEj 

1100 

devi D,&HA000,N,1 

300 

if 

A = "9" 

1 then 

V=1:W=-1: gosub r M 0VEj 

1110 

L=peek(&HA000+B) 

310 

if 

A="0" 

1 then 

gosub r DELETEj 

1 120 

if L=0 then gosub r READ2j 

320 

if 

A= 13 

then 

gosub rwRITEj 

1 130 

if L=0 then return : else L=L*2 


1140 for 1=1 to L step 2 
1150 P=wpeek ( &.HA000 + B +1 ) 

1160 Y=P and 15:X=(P/16) and 15 

1170 S=(P/256) and 15:R=(P/4096) and 15 

1180 line (R*20,S*10)-(X*20,Y*10):color 3,1 

1190 line (R*2,S+160)-(X*2,Y+160):color 1,1 

1200 next :L=L+1 

1210 return 

1220 » 

1230 r READ2j 

1240 print tab(WID/2);"3t *W 
1250 locate curx+7,cury:print "0" 

1260 locate curx-8,cury: gosub r INPUTj 

1270 if C=0 then L=0: return 

1280 M=C-&H2121 

1290 M=(M/256)*94+mod(M,256) 

1300 C=raod(M,4> *64:M=M/4 + 32 
1310 devi D,&HA100,M,1 
1320 L=peek(&HA100+C) 

1330 if L>0 then ldir &HA100+C,&HA000+B,64 
1340 return 
1 350 ’ 

1360 r WRITEj 

1370 poke &HA000+B,L/2 
1380 devo D,&HA000,N,1 
1390 return 


• BASIC "J 


10:75 
90:27 
170:FB 
250:84 
330:47 
410:86 
490:C8 
570:5D 
650:81 
730:E0 
810:91 
890:66 
970:7D 
1050:27 
1130:89 
1210:8A 
1290:78 
1 370:2A 


20:27 
100:84 
180:47 
260:7D 
340:83 
420:D5 
500:2C 
580:61 
660:90 
740:89 
820:21 
900:55 
980:E2 
1060:04 
1140:B8 
1220:27 
1300:74 
1380:51 


3 0: 5 B 
110:7A 
190:27 
270:89 
350:CB 
430:41 
510:3D 
590:72 
670:51 
7 50:FE 
830:8A 
910:58 
990:54 
1 070:2F 
1150:69 
1230:06 
1310:50 
1390:8A 


40:84 
120:FC 
200:84 
280:E5 
360:43 
440:0D 
520:83 
600:8A 
680:48 
760:E7 
840:27 
920:78 
): 81 
): 7E 
1160:80 
l240:DE 
1320-.F2 


10 


50: 4B 
130:13 
210:14 
290:B8 
370:27 
450:C5 
530:8A 
610:27 
690:91 
770:10 
850:6B 
930:88 
1010:52 
1090:76 
1170:2D 
1250:E5 
1330:4E 


60:59 
140:5D 
220:82 
300:BA 
380:57 
460:8A 
540:27 
620:E9 
700:20 
780:ED 
860:51 
940:69 
1020:91 
1 100:50 
1180:31 
1260:AF 
1 340:8A 


70: F9 
150:72 
230:85 
310:03 
390:27 
470:27 
550:EF 
630:E7 
710:8A 
790:D3 
870:72 
950:B0 
1030:72 
111 0:F0 
1190:3D 
1270:4A 
1350:27 


i) * 6 iimBn—P > v -x •; x y 


0000 

0000 

0000 

0000 


0000 


0000 


0000 


1 

2 

3 

4 

5 

6 

7 

8 


10 

11 


\* KANJI PRINT PACKAGE VER1.0 * 
;* 1987/06/10 by K.MORI * 
;*«t*t****tt*»t*******(t**tt**t** 


MGINIT EQU 0AF00H 
MAGIC EQU 0B004H 
4RDVSW EQU 2024H 
#ROPEN EQU 2009H 
#SCTRD EQU 2000H 
♦DTBUF EQU 1F64H 


MAGIC INIT 
MAGIC ADR 
DEV. LOAD 
FCB READ 
DISK READ 
REC. BUFFER 


0000 

0000 

0000 


0000 


0000 

AB00 

AB00 


12 *MEMAX EQU 1F6AH 

13 4FILE EQU 1FA3H 

14 #DSK EQU 1F5DH 

15 *BELL EQU 1FC4H 

16 WRKORG EQU 0A000H 

17 WRKEND EQU 0AAFFH 

18 ; 

19 ; JUMP TABLE - 

20 ; 

21 ORG 0AB00H 

22 ; 


; MEMORY MAX 
; FILE NAME SET 
; DEV. WORK 

! MAGIC DATA START 
; MAGIC DATA END 


118 Oh! MZ 1987.8. 


J: & ( 17 ) 'Mium 


170:40 
250:7F 
330:27 
410:83 


80:66 

16© 

240:87 
320:CB 
400:48 
480:8B 
560:05 
640:8F 
720:27 
800:66 
880:77 
960:2D 
1040:8A 
120:65 
200:KE 
280:2E 
360:43 





A300 
ABOO 
ABO 3 
AB06 
AB09 
AB0C 
ABOF 
AB12 
AB15 
AB1 8 
AB1B 
ABIE 
AB21 
AB24 
AB27 
AB2A 
AB2D 
AB2D 
AB2D 
AB2D 
AB2D 
AB2E 
AB2F 
AB30 
AB32 
AB35 
AB38 
AB3A 
AB3D 
AB40 
AB4 3 
AB4 5 

AB4B 
AB4E 
AB5 1 
AB54 
AB55 
AB58 
AB5B 
AB5E 
AB61 
AB63 
AB66 
AB69 
AB6C 
AB6F 
AB72 
AB7 4 
AB77 
AB78 
AB7B 
AB7C 
AB7E 
AB7E 
AB7F 
AB80 
AB83 
AB86 
AB87 
AB87 
AB89 
AB8A 
AB8B 
AB8C 
AB8D 
AB8D 
AB8D 
AB8E 
AB8F 
AB90 
AB92 
AB95 
AB97 
AB9A 
AB9C 
AB9F 
ABA2 
ABA5 
ABA8 
ABAB 
ABAC 
ABAC 
ABAE 
ABAF 
ABB0 
ABB1 
ABB2 
ABB2 
ABB2 
ABB4 
ABB7 
ABB9 
ABBA 
4S&K 
ABBA 
ABBB 
ABBD 
ABC0 
ABC1 
ABC1 
ABC1 
ABC2 
ABC3 
ABC6 
ABCS 
ABCA 
ABCA 
ABCD 
ABD0 
ABD1 
ABD4 
ABD6 
ABD6 
ABD9 
ABDC 
ABDD 
ABE0 
ABE0 
ABE1 
ABE2 
ABE 3 
ABE3 
ABE 3 
ABE4 
ABE5 
ABE6 
ABE8 
ABEB 
ABEC 
ABEF 
ABF2 


4 


HE SENTINEL 





23 JMPTBL 




ABF5 

3A 

DD 

AE 

151 


LD 

A,(KPDIR) 

C3 

2D 

AB 

24 

JP 

KPINIT 

INITAL 

ABF8 

E6 

01 


152 


AND 

1 

C3 

8D 

AB 

25 

JP 

KPRINT 

CHR.PRINT 

ABFA 

20 

08 


153 


JR 

NZ,VERHME 

C3 

B2 

AB 

26 

JP 

KMPRNT 

MSG.PRINT 

ABFC 




154 

HORHME 



C3 

BA 

AB 

27 

JP 

KSPRNT 

STR.PRINT 

ABFC 

2A 

9D 

AE 

155 


LD 

HL,(MGDATA+1) 

C3 

Cl 

AB 

28 

JP 

KLTNL 

CRLF 

ABFF 

22 

DE 

AF. 

156 


LD 

(KPCURX),HL 

C3 

E3 

AB 

29 

JP 

KPCLS 

CLS 

AC02 

18 

10 


157 


JR 

KCLSED 

C3 

1C 

AC 

30 

JP 

STSCRN 

SCREEN 

AC04 




158 

VERHME 



C3 

50 

AC 

31 

JP 

SETWIN 

WINDOW 

AC04 

2A 

A1 

AE 

159 


LD 

HL,(MGDATA+5) 

C3 

31 

AC 

32 

JP 

SETPAL 

PA LET 

AC07 

3A 

DA 

AE 

160 


LD 

A,(KPSIZE) 

C3 

6F 

AC 

33 

JP 

STSIZE 

CHR.SIZE 

AC0A 

3D 



161 


DEC 

A 

C3 

74 

AC 

34 

JP 

STPICH 

SPC.PITCH 

AC0B 

06 

00 


162 


LD 

B, 0 

C3 

78 

AC 

35 

JP 

SETDIR 

DIRECTION 

AC0D 

4F 



163 


LD 

C, A 

C3 

7C 

AC 

36 

JP 

SETLOC 

LOCATE 

AC0E 

B7 



164 


OR 

A 

C3 

90 

AC 

37 

JP 

RSVTBL 

RESERVED 

AC0F 

ED 

42 


165 


SBC 

HL, BC 

C3 

90 

AC 

38 

JP 

RSVTBL 

RESERVED 

AC11 

22 

DE 

AE 

166 


LD 

(KPCURX),HL 




39 ; 




AC 14 




167 

KCLSED 






40 ;- 




ACM 

DD 

El 


168 


POP 

IX 




41 ; 




AC 16 

El 



169 


POP 

HL 




42 KPIN1T 




AC 17 

D1 



170 


POP 

DE 

C5 



4 3 

PUSH 

BC 


AC 18 

Cl 



171 


POP 

BC 

D5 



44 

PUSH 

DE 


AC 19 

C9 



172 


RET 


ES 



45 

PUSH 

HL 


AC 1A 




173 

CLSDAT 



DD 

E5 


46 

PUSH 

IX 


AC1A 

09 

OF 


174 


DEFB 

09H:0FH 

CD 

24 

20 

47 

CALL 

♦RDVSW 

Acc <== DEV. 

AC 1C 




175 

; 



32 

94 

AE 

48 

LD 

(KSTDEV)iA 


AC 1C 




176 

STSCRN 



3E 

04 


49 

LD 

A, 04H 

A <== 'Aac’ 

AC 1C 

C5 



177 


PUSH 

BC 

11 

C8 

AE 

50 

LD 

DE,KSTNAM 


ACID 

D5 



178 


PUSH 

DE 

CD 

A3 

IF 

51 

CALL 

♦ FILE 


AC IE 

E5 



179 


PUSH 

HL 

CD 

09 

20 

52 

CALL 

#ROPEN 


AC IF 

DD 

E5 


180 


PUSH 

IX 

38 

39 


53 

JR 

C,KPIERR 

File exist ? 

AC21 

DD 

21 

9C 

181 


LD 

IX,MGDATA 

21 

00 

00 

54 

LD 

HL i 0 


AC24 

AE 







22 

DE 

AE 

55 

LD 

(KPCURX),HL 

HOME 

AC 2 5 

DD 

77 

14 

182 


LD 

(IX+20),A 

22 

K0 

AE 

56 

LD 

(KPCURY) , HL 


AC28 

CD 

04 

B0 

183 


CALL 

MAGIC 

21 

20 

10 

57 

LD 

HL,1020H 

H <= Y,L <= X 

AC2B 

DD 

El 


184 


POP 

IX 

22 

DA 

AE 

58 

LD 

(KPSIZEI,HL 


AC2D 

El 



185 


POP 

HL 

AF 



59 

XOR 

A 


AC2E 

D1 



186 


POP 

DE 

32 

DC 

AE 

60 

LD 

(KPITCH),A 

SPACE PITCH 

AC2F 

Cl 



187 


POP 

BC 

32 

DD 

AE 

61 

LD 

(KPDIR),A 

DIRECTION 

AC30 

C9 



188 


RET 


2A 

E4 

AE 

62 

LD 

HL,(MADRED) 


AC 31 




189 

; 



11 

OB 

00 

63 

LD 

DE, 1 1 


AC31 




190 

SETPAL 



ED 

52 


64 

SBC 

HL, DE 


AC 3 1 

El 



191 


POP 

HL 

22 

97 

AE 

65 

LD 

(MAEDWK),HL 

DATA ADR. - 11 

AC32 

C5 



192 


PUSH 

BC 

CD 

00 

AF 

66 

CALL 

MGINIT 


AC33 

D5 



193 


PUSH 

DE 

21 

B2 

AE 

67 

LD 

HL,MGIDAT 


AC 3 4 

DD 

E5 


194 


PUSH 

IX 

1 1 

9C 

AE 

68 

LD 

DE.MGDATA 


AC36 

11 

A6 

AE 

195 


1.D 

DE.MGDATA+10 

01 

16 

00 

69 

LD 

BC, 22 


AC39 

06 

08 


196 


LD 

B, 8 

ED 

B0 


70 

LDIR 



AC3B 




197 

STPAL2 



DD 

21 

9C 

71 

LD 

IX,MGDATA 


AC3B 

7E 



198 


LD 

A, (HL) 

AE 







AC3C 

23 



199 


INC 

HL 

CD 

04 

B0 

72 

CALL 

MAGIC 


AC3D 

12 



200 


LD 

(DE),A 

B7 



73 

OR 

A 

RESET CF 

AC3E 

13 



201 


INC 

DE 

18 

09 


74 

JR 

KPIBND 


AC3F 

10 

FA 


202 


DJNZ 

STPAL2 




75 KPIERR 




AC4 1 

E5 



203 


PUSH 

HL 

F5 



76 

PUSH 

AF 


AC42 

DD 

21 

9C 

204 


LD 

IX,MGDATA 

AF 



77 

XOR 

A 


AC45 

AE 







32 

94 

AE 

78 

LD 

(KSTDEV),A 


AC46 

CD 

04 

B0 

205 


CALL 

MAGIC 

CD 

C4 

IF 

79 

CALL 

♦ BELL 


AC49 

El 



206 


POP 

HL 

FI 



80 

POP 

AF 


AC4 A 

DD 

El 


207 


POP 

IX 




81 KPIEND 




AC4C 

D1 



208 


POP 

DE 

DD 

El 


82 

POP 

IX 


AC4D 

Cl 



209 


POP 

BC 

El 



83 

POP 

HL 


AC4E 

E5 



210 


PUSH 

HL 

D1 



84 

POP 

DE 


AC4F 

C9 



211 


RET 


Cl 



85 

POP 

BC 


AC50 




212 

; 



C9 



86 

RET 



AC50 




213 

SETWIN 






87 ; 




AC50 

El 



214 


POP 

HL 




88 KPRINT 



; DE = JIS CODE 

AC51 

C5 



215 


PUSH 

BC 

C5 



89 

PUSH 

BC 


AC 5 2 

D5 



216 


PUSH 

DE 

D5 



90 

PUSH 

DE 


AC53 

DD 

E5 


217 


PUSH 

IX 

B5 



91 

PUSH 

HL 


AC55 

11 

9D 

AE 

218 


LD 

DE.MGDATA+l 

DD 

E5 


92 

PUSH 

IX 


AC58 

06 

08 


219 


LD 

B, 8 

CD 

16 

AE 

93 

CALL 

KSTCHK 

; INIT ? 

AC5A 




220 

STWIN2 



38 

15 


94 

JR 

C,KPREND 

; KST SBT ? 

AC5A 

7E 



221 


LD 

A,(HL) 

CD 

ID 

AE 

95 

CALL 

CURCHK 


AC5B 

23 



222 


INC 

HL 

38 

10 


96 

JR 

C,KPREND 

; CUR. Over ? 

AC5C 

12 



223 


LD 

(DE),A 

32 

5D 

IF 

97 

LD 

(♦DSK),A 

; DEV. SET 

AC5D 

13 



224 


INC 

DE 

2A 

E2 

AE 

98 

LD 

HL,(MAGADR) 


AC5E 

10 

FA 


225 


DJNZ 

STWIN2 

22 

95 

AE 

99 

LD 

(MADRWK),HL 


AC60 

E5 



226 


PUSH 

HL 

CD 

D3 

AC 

100 

CALL 

JISHAG 

; KST ==> MAGIC 

AC61 

DD 

21 

9C 

227 


LD 

IX,MGDATA 

CD 

50 

AE 

101 

CALL 

GMAGIC 

; KANJI WRITB 

AC64 

AE 







B7 



102 

OR 

A 

; RCF 

AC65 

CD 

04 

B0 

228 


CALL 

MAGIC 




103 KPREND 




AC68 

El 



229 


POP 

HL 

DD 

El 


104 

POP 

IX 


AC69 

DD 

El 


230 


POP 

IX 

El 



105 

POP 

HL 


AC6B 

D1 



231 


POP 

DE 

D1 



106 

POP 

DE 


AC6C 

Cl 



232 


POP 

BC 

Cl 



107 

POP 

BC 


AC6D 

E5 



233 


PUSH 

HL 

C9 



108 

RET 



AC6E 

C9 



234 


RET 





109 ; 




AC6F 




235 

; 






110 KMPRNT 



; (PC) = "MSG" 

AC6F 




236 

STSIZE 



DD 

El 


111 

POP 

IX 

; IX <== PC 

AC6F 

ED 

53 

DA 

237 


LD 

(KPSIZE),DE 

CD 

91 

AC 

112 

CALL 

KMSSUB 


AC72 

AE 







DD 

E5 


113 

PUSH 

IX 

; NEXT OP. 

AC73 

C9 



238 


RET 


C9 



114 

RET 



AC7 4 




239 

; 






115 ; 




AC7 4 




240 

STPICH 






116 KSPRNT 



; (DE) = "STR" 

AC7 4 

32 

DC 

AE 

241 


LD 

(KPITCH),A 

D5 



117 

PUSH 

DE 


AC77 

C9 



242 


RET 


DD 

El 


118 

POP 

IX 

; IX <== DE 

AC78 




243 

; 



CD 

91 

AC 

119 

CALL 

KMSSUB 


AC78 




244 

SETDIR 



C9 



120 

RET 



AC78 

32 

DD 

AE 

245 


LD 

(KPDIR),A 




121 ; 




AC7B 

C9 



246 


RET 





122 KLTNL 




AC7C 




247 

; 



D5 



123 

PUSH 

DE 

m 

AC7C 




248 

SETLOC 



E5 



124 

PUSH 

HL 


AC7C 

El 



249 


POP 

HL 

3A 

DD 

AE 

125 

LD 

A,(KPDIR) 


AC7D 

D5 



250 


PUSH 

DE 

E6 

01 


126 

AND 

1 


AC7E 

5E 



251 


LD 

E,(HL) 

20 

0C 


127 

JR 

NZ,VERLF 


AC7F 

23 



252 


INC 

HL 




128 HORLF 




AC80 

56 



253 


LD 

D,(HL) 

11 

80 

02 

129 

LD 

DE,640 


AC81 

23 



254 


INC 

HL 

ED 

53 

DE 

130 

LD 

(KPCURX),DE 


AC82 

ED 

53 

DE 

255 


LD 

(KPCURX),DE 

AE 







AC85 

AE 







CD 

14 

AD 

131 

CALL 

CURINC 


AC86 

5E 



256 


LD 

E,(HL) 

18 

OA 


132 

JR 

KLTNL2 


AC87 

23 



257 


INC 

HL 




133 VERLF 




AC88 

56 



258 


LD 

D,(HL) 

11 

C8 

00 

134 

LD 

DE,200 


AC89 

23 



259 


INC 

HL 

ED 

53 

E0 

135 

LD 

(KPCURY),DE 


AC8A 

ED 

63 

B0 

260 


LD 

(KPCURY),DB 

AE 







AC8D 

AE 







CD 

14 

AD 

136 

CALL 

CURINC 


AC8E 

D1 



261 


POP 

DE 




137 KLTNL2 




AC8F 

E5 



262 


PUSH 

HL 

El 



138 

POP 

HL 


AC90 




263 

RSVTBL 



D1 



139 

POP 

DE 


AC90 

C9 



264 


RET 


C9 



140 

RET 



AC91 




265 

; 






141 ; 




AC91 




266 

; SUBROUTINES - 




142 KPCLS 




AC91 




267 

; 



C5 



143 

PUSH 

BC 


AC91 




268 

KMSSUB 



D5 



144 

PUSH 

DB 


AC91 

C5 



269 


PUSH 

BC 

B5 



145 

PUSH 

HL 


AC92 

D5 



270 


PUSH 

DE 

DD 

E5 


146 

PUSH 

IX 


AC93 

E5 



271 


PUSH 

HL 

DD 

21 

1A 

147 

LD 

IX,CLSDAT 


AC94 

CD 

16 

AE 

272 


CALL 

KSTCHK 

AC 







AC97 

38 

21 


273 


JR 

C,KMSERR 

CD 

04 

B0 

148 

CALL 

MAGIC 


AC99 

2A 

E2 

AE 

274 


LD 

HL,(MAGADR) 

2A 

9F 

AE 

149 

LD 

HL,(MGDATA+3) 


AC9C 

22 

95 

AE 

275 


LD 

(MADRWK),HL 

22 

E0 

AE 

150 

LD 

(KPCURY),HL 


AC9F 

32 

5D 

IF 

276 


LD 

(♦DSK),A 


; -RESET CF 


; CLS,DONE 
; A = PLANE 


; (PC) = DATA 


; (PC) = DATA 


; DE = SIZE 

; A = PITCH 

; A = DIRECTION 

; (PC) = POS. 


; INIT ? 


► lii'&O) Oh ! MZ U tiny%<D fz to iz I' h h i ifiris ir L X < ft X $Hj?f L i' fc £i' i 1*. JH 

gift cotr-to z m* c, r^g h * 0h j MZj r < 

m (i6) *uur 


JACKWRITE 119 





ACA2 




277 

KMSSB2 



ACA2 

CD 

ID 

AE 

278 


CALL 

CURCHK 

ACA5 

38 

13 


279 


JR 

C,KMSERR 

ACA7 

DD 

56 

01 

280 


LD 

D, (TX+l ) 

ACAA 

DD 

5E 

00 

281 


LD 

E,(IX+0) 

ACAD 

DD 

23 


282 


INC 

IX 

ACAF 

DD 

23 


283 


INC 

IX 

ACB1 

7A 



284 


LD 

A, D 

ACB2 

B3 



285 


OR 

E 

ACB3 

28 

16 


286 


JR 

Z,KMSEND 

ACB5 

CD 

D3 

AC 

287 


CALL 

JI SHAG 

ACB8 

18 

E8 


288 


JR 

KMSSB2 

ACBA 




289 

KMSERR 



ACBA 

DD 

56 

01 

290 


LD 

D, (IX+1) 

ACBD 

DD 

5E 

00 

291 


LD 

E,(IX + 0) 

ACC0 

DD 

23 


292 


INC 

IX 

ACC 2 

DD 

23 


293 


INC 

IX 

ACC4 

7A 



294 


LD 

A, D 

ACC5 

B3 



295 


OR 

E 

ACC6 

20 

F2 


296 


JR 

NZ,KMSERR 

ACC 8 

37 



297 


SCF 


ACC9 

18 

04 


298 


JR 

KMSED2 

ACCB 




299 

KMSEND 



ACCB 

CD 

50 

AE 

300 


CALL 

GMAGIC 

ACCE 

B7 



301 


OR 

A 

ACCF 




302 

KMSED2 



ACCF 

El 



303 


POP 

HL 

ACD0 

D1 



304 


POP 

DE 

ACD1 

Cl 



305 


POP 

BC 

ACD2 

C9 



306 


RET 


ACD3 




307 

; 



ACD3 




308 

JISMAG 



ACD3 

CD 

C4 

AD 

309 


CALL 

JISADR 

ACD6 

38 

3C 


310 


JR 

CiCURINC 

ACD8 

2A 

64 

IF 

311 


LD 

HL,(#DTBUF) 

ACDB 

3E 

01 


312 


LD 

A, 1 

ACDD 

CD 

00 

20 

313 


CALL 

#SCTRD 

ACE0 

09 



314 


ADD 

HL, BC 

ACE 1 




315 

SETMAG 



ACE 1 

DD 

E5 


316 


PUSH 

IX 

ACE3 

E5 



317 


PUSH 

HL 

ACE 4 

DD 

El 


318 


POP 

IX 

ACE6 

DD 

7E 

00 

319 


LD 

A,(IX+0) 

ACE9 

DD 

23 


320 


INC 

IX 

ACEB 

B7 



321 


OR 

A 

ACEC 

28 

24 


322 


JR 

Z,STMGED 

ACEE 

2A 

95 

AE 

323 


LD 

HL,(MADRWK) 

ACF1 

47 



324 


LD 

B, A 

ACF2 

37 



325 


SCF 


ACF3 




326 

SETMG2 



ACF3 

DD 

4E 

01 

327 


LD 

C, (IX+1) 

ACF6 

CD 

FA 

AD 

328 


CALL 

LCNTCK 

ACF9 

C4 

8A 

AD 

329 


CALL 

NZ,POSSET 

ACFC 

DD 

4E 

00 

330 


LD 

C,(IX+0) 

ACFF 

79 



331 


LD 

A, C 

AD00 

32 

99 

AE 

332 


LD 

(POSWRK),A 

AD03 

CD 

8A 

AD 

333 


CALL 

POSSET 

AD06 

DD 

23 


334 


INC 

IX 

AD08 

DD 

23 


335 


INC 

IX 

AD0A 

22 

95 

AE 

336 


LD 

(MADRWK),HL 

AD0D 

CD 

46 

AE 

337 


CALL 

MEMCHK 

AD 10 

10 

El 


338 


DJNZ 

SETMG2 

AD 12 




339 

STMGED 



AD 12 

DD 

El 


340 


POP 

IX 

ADM 




341 

CURINC 



ADM 

3A 

DD 

AE 

342 


LD 

A, (KPDIR) 

ADI 7 

E6 

01 


343 


AND 

1 

AD 19 

20 

12 


344 


JR 

NZ,VERINC 

AD IB 




345 

HORINC 



AD1B 

B7 



346 


OR 

A 

AD 1C 

CD 

3F 

AD 

347 


CALL 

INCURX 

ADI F 

CD 

ID 

AE 

348 


CALL 

CURCHK 

AD22 

D0 



349 


RET 

NC 

AD23 

21 

00 

00 

350 


LD 

HL, 0 

AD26 

22 

DE 

AE 

351 


LD 

(KPCURX),HL 

AD29 

CD 

67 

AD 

352 


CALL 

INCURY 

AD2C 

C9 



353 


RET 


AD2D 




354 

VERINC 



AD2D 

CD 

67 

AD 

355 


CALL 

INCURY 

AD30 

CD 

ID 

AE 

356 


CALL 

CURCHK 

AD33 

DO 



357 


RET 

NC 

AD34 

21 

00 

00 

358 


LD 

HL, 0 

AD37 

22 

E0 

AE 

359 


LD 

(KPCURY),HL 

AD3A 

37 



360 


SCF 


AD3B 

CD 

3F 

AD 

361 


CALL 

INCURX 

AD3E 

C9 



362 


RET 


AD3F 




363 

; 



AD3F 




364 

INCURX 



AD3F 

F5 



365 


PUSH 

AF 

AD40 

2A 

DE 

AE 

366 


LD 

HL,(KPCURX) 

AD4 3 

3A 

DA 

AE 

367 


LD 

A, (KPSIZE) 

AD46 

16 

00 


368 


LD 

D, 0 

AD48 

5F 



369 


LD 

E, A 

AD49 

3A 

DC 

AE 

370 


LD 

A,(KPITCH) 

AD4C 

E6 

OF 


371 


AND 

0FH 

AD4E 

CD 

7A 

AE 

372 


CALL 

DEMULA 

AD5 1 

CD 

69 

AE 

373 


CALL 

DESR4 

AD54 

3A 

DA 

AE 

374 


LD 

A,(KPSIZE) 

AD57 

CD 

8F 

AE 

375 


CALL 

DEADDA 

AD5A 

FI 



376 


POP 

AF 

AD5B 

38 

03 


377 


JR 

C,DCCURX 

AD5D 

19 



378 


ADD 

HL, DE 

AD5E 

18 

03 


379 


JR 

INCRX2 

AD60 




380 

DCCURX 



AD60 

B7 



381 


OR 

A 

AD61 

ED 

52 


382 


SBC 

HL, DE 

AD63 




383 

INCRX2 



AD63 

22 

DE 

AE 

384 


LD 

(KPCURX),HL 

AD66 

C9 



385 


RET 


AD67 




386 

INCURY 



AD67 

2A 

E0 

AE 

387 


LD 

HL, (KPCURY) 

AD6A 

3A 

DB 

AE 

388 


LD 

A,(KPSIZE+1) 

AD6D 

16 

00 


389 


LD 

D, 0 

AD6F 

5F 



390 


LD 

E, A 

AD70 

3A 

DC 

AE 

391 


LD 

A, (KPITCH) 

AD7 3 

E6 

F0 


392 


AND 

0F0H 

AD7 5 

0F 



393 


RRCA 


AD7 6 

0F 



394 


RRCA 


AD77 

0F 



395 


RRCA 


AD 7 8 

0F 



396 


RRCA 


AD7 9 

CD 

7A 

AE 

397 


CALL 

DEMULA 

AD7C 

CD 

69 

AE 

398 


CALL 

DESR4 

AD7F 

3A 

DB 

AE 

399 


LD 

A,(KPSIZE+1) 

AD82 

CD 

8F 

AE 

400 


CALL 

DEADDA 

AD85 

19 



401 


ADD 

HL, DE 

AD86 

22 

E0 

AE 

402 


LD 

(KPCURY),HL 

AD89 

C9 



403 


RET 


AD8A 




404 

; 



AD8A 




405 

POSSET 



AD8A 

16 

00 


406 


LD 

D, 0 

AD8C 

59 



407 


LD 

E.C 

AD8D 

CB 

3B 


408 


SRL 

E 



AD8F 

CB 

3B 


409 


SRL 

E 



AD91 

CB 

3B 


410 


SRL 

E 


CUR. Over ? 

AD93 

CB 

3B 


411 


SRL 

E 

; DE = 0-15 


AD95 

3A 

DA 

AE 

412 


LD 

A, (KPSIZE) 


DE <== JIS 

AD98 

CD 

7A 

AE 

413 


CALL 

DEMULA 

; * SIZE 


AD9B 

CD 

69 

AE 

414 


CALL 

DESR4 

; / 16 


AD9E 

E5 



415 


PUSH 

HL 



AD9F 

2A 

DE 

AE 

416 


LD 

HL,(KPCURX > 

; + POS. 


AO A 2 

19 



417 


ADD 

HL, DE 


0000H ? 

ADA3 

EB 



418 


EX 

DE, HL 



ADA4 

El 



419 


POP 

HL 



ADA5 

73 



420 


LD 

(HL),E 

; DATA STORE 


ADA6 

23 



421 


INC 

HL 



ADA7 

72 



422 


LD 

(HL),D 



ADA8 

23 



423 


INC 

HL 



ADA9 

79 



424 


LD 

A, C 

; Y POS. 


ADAA 

E6 

0F 


425 


AND 

0FH 



ADAC 

16 

00 


426 


LD 

D, 0 



ADAE 

5F 



427 


LD 

E, A 

; DE = 0-15 


ADAF 

3A 

DB 

AE 

428 


LD 

A,(KPSIZE+1) 


SET CF 

ADB2 

CD 

7A 

AE 

429 


CALL 

DEMULA 

; * SIZE 


ADB5 

CD 

69 

AE 

430 


CALL 

DF.SR4 

; / 16 


ADB8 

E5 



431 


PUSH 

HL 



ADB9 

2A 

E0 

AE 

432 


LD 

HL,(KPCURY) 


RESET CF 

ADBC 

19 



433 


ADD 

HL, DE 

; + POS. 


ADBD 

EB 



434 


EX 

DE, HL 



ADBE 

El 



435 


POP 

HL 



ADBF 

73 



436 


LD 

(HL),E 

; DATA STORE 


ADCO 

23 



437 


INC 

HL 



ADC 1 

72 



438 


LD 

(HL),D 



ADC2 

23 



439 


INC 

HL 



ADC 3 

C9 



440 


RET 



DE <== RECN 

ADC4 




441 

; 




BAD CODE 

ADC4 




442 

JISADR 



; DE = JIS CODE 


ADC4 

EB 



443 


EX 

DE, 11L 

; DE <==> HL 

1 REC. 

ADC 5 

11 

21 

21 

444 


LD 

DE.2121H 



ADC8 

B7 



445 


OR 

A 


#DTBUF + OFST 

ADC9 

ED 

52 


446 


SBC 

HL, DE 

; CODE - 2121 


ADCB 

3E 

5D 


447 


LD 

A,93 

; LOW. < 94 ? 


ADCD 

95 



448 


SUB 

L 



ADCE 

D8 



449 


RET 

C 


IX <== KSTADR 

ADCF 

3E 

2E 


450 


LD 

A,46 

; COL. < 47 ? 

LINE NO. 

ADD1 

94 



451 


SUB 

H 



ADD2 

D8 



452 


RET 

C 



ADD3 

16 

00 


453 


LD 

D, 0 



ADD 5 

5C 



454 


LD 

E,H 



ADD6 

3E 

5E 


455 


LD 

A,94 



ADD8 

CD 

7A 

AE 

456 


CALL 

DEMULA 

; COL. * 94 

1ST FLAG 

ADDB 

7D 



457 


LD 

A, L 



ADDC 

CD 

8F 

AE 

458 


CALL 

DEADDA 

; + LOW 

1ST POS. 

ADDF 

7B 



459 


LD 

A, E 


LINE CONT? 

ADE0 

E6 

03 


460 


AND 

3 



ADE2 

87 



461 


ADD 

A,A 


2ND POS. 

ADB3 

87 



462 


ADD 

A,A 



ADE4 

87 



463 


ADD 

A,A 



ADE5 

87 



464 


ADD 

A,A 



ADE6 

87 



465 


ADD 

A,A 



ADE7 

87 



466 


ADD 

A,A 

; 64 TIMES 


ADE8 

06 

00 


467 


LD 

B, 0 



ADEA 

4F 



468 


LD 

C, A 

; BC = DATA ADR 


ADEB 

CB 

3A 


469 


SRL 

D 



ADED 

CB 

IB 


470 


RR 

E 



ADEF 

CB 

3A 


471 


SRL 

D 



ADF1 

CB 

IB 


472 


RR 

E 



ADF3 

3E 

20 


473 


LD 

A,32 


DIRECTION FLAG 

ADF5 

CD 

8F 

AE 

474 


CALL 

DEADDA 

; / 4 + 32 

0:HOR. 1:VER. 

ADF8 

B7 



475 


OR 

A 

; RESET CF 


ADF9 

C9 



476 


RET 




ADFA 




477 

; 




RESET CF 

ADFA 




478 

LCNTCK 




INC. X POS. 

ADFA 

38 

0E 


479 


JR 

C, STLCMD 


CURSOR OVER ? 

ADFC 

3A 

99 

AE 

480 


LD 

A,(POSWRK) 



ADFF 

A9 



481 


XOR 

C 



AE00 

20 

08 


482 


JR 

NZ,STLCMD 



AE02 

E5 



483 


PUSH 

HL 


INC. Y POS. 

AE03 

2A 

9A 

AE 

484 


LD 

HL,(LNMADR) 


AE06 

34 



485 


INC 

(HL) 



AE07 

El 



486 


POP 

HL 


INC. Y POS. 

AE08 

AF 



487 


XOR 

A 

; SET ZF 

CURSOR OVER ? 

AE09 

C9 



488 


RET 




AE0A 




489 

STLCMD 





AE0A 

AF 



490 


XOR 

A 

; 'LINE' 


AE0B 

77 



491 


LD 

(HL),A 


SBF CF 

AE0C 

23 



492 


INC 

HL 



AE0D 

3E 

02 


493 


LD 

A,2 

; 1 LINE 


AE0F 

77 



494 


LD 

(HL),A 



AE10 

22 

9A 

AE 

495 


LD 

(LNMADR),HL 



AE 13 

23 



496 


INC 

HL 


CF STORE 

AE14 

B7 



497 


OR 

A 

; RES ZF 

X POS. 

AE15 

C9 



498 


RET 



CHAR. SIZE 

AE16 




499 

KSTCHK 





AE16 

3A 

94 

AE 

500 


LD 

A, (KSTDEV) 



AE 19 

B7 



501 


OR 

A 



AE1A 

C0 



502 


RET 

NZ 


SPACE PITCH 

AE1B 

37 



503 


SCF 


; SET CF 

SIZE * PITCH 

AE1C 

C9 



504 


RET 



/16 

AE1D 




505 

CURCHK 




AE ID 

ED 

4B 

DE 

506 


LD 

BC,(KPCURX) 


+ SIZE 

AE20 

AE 






HL,(MGDATA+5) 


CF LOAD 

AE21 

2A 

A 1 

AE 

507 


LD 


AE24 

B7 



508 


OR 

A 

; RESET CF 

CASE CY 

AE25 

ED 

42 


509 


SBC 

HL, BC 

; X < MAX ? 

AE27 

D8 



510 


RET 

C 



AE28 

2A 

9D 

AE 

511 


LD 

HL,(MGDATA+1) 


CASE NCY 

AE2B 

B7 



512 


OR 

A 



AE2C 

ED 

42 


513 


SBC 

HL, BC 

; X >= MIN ? 


AE2E 

28 

02 


514 


JR 

Z,CURCK2 



AE30 

3F 



515 


CCF 




AE3 1 

D8 



516 


RET 

C 



AE32 




517 

CURCK2 




Y POS. 

AE32 

ED 

4B 

E0 

518 


LD 

BC,(KPCURY) 


AE35 

AE 









AE36 

2A 

A3 

AE 

519 


LD 

HL,(MGDATA+7) 



AE39 

B7 



520 


OR 

A 



AE3A 

ED 

42 


521 


SBC 

HL, BC 

*, Y < MAX ? 

Y PITCH 

AE3C 

D8 



522 


RET 

C 


AB3D 

2A 

9F 

AE 

523 


LD 

HL,(MGDATA+3) 



AE40 

B7 



524 


OR 

A 



AE41 

ED 

42 


525 


SBC 

HL, BC 

; Y >= MIN ? 

/ 16 

AE43 

C8 



526 


RET 

Z 


PITCH * SIZE 

AE44 

3F 



527 


CCF 



/ 1 

AE4 5 

C9 



528 


RET 




AE46 




529 

MEMCHK 




+ SIZE 

AE46 

ED 

5B 

97 

530 


LD 

DE,(MAEDWK) 


AE49 

AE 









AE4A 

EB 



531 


EX 

DE, HL 



AE4B 

B7 



532 


OR 

A 



AE4C 

ED 

52 


533 


SBC 

HL, DE 



AE4E 

EB 



534 


EX 

DE, HL 


X POS. 

AE4F 

D0 



535 


RET 

NC 

; MEMORY OVER? 

AE50 




536 

GMAGIC 





AE50 

2A 

95 

AE 

537 


LD 

HL,(MADRWK) 
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4 


HE SENTINEL 


AE53 36 0F 
AE55 2A E2 AE 
AE58 22 95 AE 
AE5B E5 
AE5C DD E5 
AE5E E5 
AE5F DD El 


538 

539 

540 

541 

542 

543 

544 


LD (HL),0FH 
LD HL,(MAUADH) 
LD (MADRWK),HL 
PUSH HL 
PUSH IX 
PUSH HL 
POP 


AE94 
AE94 I 
AE95 I 
AE97 i 
AE99 l 
AE9A i 
AE9C i 


586 ; 

587 KSTDEV:DEFD 0 

588 MADRWK:DBFS 2 

589 MAEDWK:DEFS 2 

590 POSWRK:DEFS 1 

591 LNMADR:DEFS 2 

592 MGDATA:DEFS 22 


AE6 1 

CD 

04 B0 

545 


CALL 

MAGIC 

AE9F 

00 

00 

00 




AE64 

DD 

El 

546 


POP 

IX 

AEA2 

00 

00 

00 




AE66 

El 


547 


POP 

HL 

AEA5 

00 

00 

00 




AE67 

37 


548 


SCF 


AEA8 

00 

00 

00 




AE68 

C9 


549 


RET 


AEAB 

00 

00 

00 




AE69 



550 




AEAE 

00 

00 

00 




AE69 



551 

DESR4 



AEB1 

00 






AE69 

CB 

3A 

552 


SRL 

D ; / 16 

AEB2 




593 



AE6B 

CB 

IB 

553 


RR 

E 

AEB2 




594 

MGIDAT 


AE6D 

CB 

3A 

554 


SRL 

D 

AEB2 

06 



595 

DBFB 

06H 

AE6F 

CB 

IB 

555 


RR 

E 

AEB3 

00 

00 

00 

596 

DEFW 

0:0:639:199 

AE7 1 

CB 

3A 

556 


SRL 

D 

AEB6 

00 

7F 

02 




AE73 

CB 

IB 

557 


RR 

E 

AEB9 

C7 

00 





AE7 5 

CB 

3A 

558 


SRL 

D 

AEBB 

OA 



597 

DEFB 

0AH 

AE77 

CB 

IB 

559 


RR 

E 

AEBC 

00 

07 

00 

598 

DEFB 

0:7:0:7:0:7:0:7 

AE79 

C9 


560 


RET 


AEBF 

07 

00 

07 




AB7A 



561 

DEMULA 



AEC2 

00 

07 





AE7A 

E5 


562 


PUSH 

HL 

AEC4 

07 



599 

DEFB 

07H 

AE7B 

21 

00 00 

563 


LD 

HL , 0 

AEC5 

02 

00 


600 

DEFB 

2:0 

AE7E 



564 

DEMLA2 



AEC7 

0F 



601 

DEFB 

0FH 

AE7E 

B7 


565 


OR 

A 

AEC8 




602 

KSTNAM 


AE7F 

28 

0B 

566 


JR 

Z.DEMLA4 

AEC8 

4B 

53 

54 

603 

DEFM 

"KST .1 

AE81 

CB 

3F 

567 


SRL 

A 

AECB 

20 

20 

20 




AE83 

30 

01 

568 


JR 

NC.DEMLA3 

AECE 

20 

20 

20 




AE85 

19 


569 


ADD 

HL.DE 

AED1 

20 

20 

20 




AE86 



570 

DEMLA3 



AED4 

20 

2E 

44 




AF.86 

CB 

23 

571 


SLA 

E 

AED7 

49 

43 





AE88 

CB 

12 

572 


RL 

D 

AED9 

00 



604 

DEFB 

0 

AR8A 

18 

F2 

573 


JR 

DEMLA2 

AEDA 




605 

; 


AE8C 



574 

DEMLA4 



AEDA 

20 

10 


606 

KPSIZE:DEFW 

1020H 

AE8C 

EB 


575 


EX 

DB.HL 

AEDC 

00 



607 

KPITCH:DEFB 

0 

AE8D 

El 


576 


POP 

HL 

AEDD 

00 



608 

KPDIR :DEFB 

0 

AE8E 

C9 


577 


RET 


AEDE 

00 

00 


609 

KPCURX:DEFW 

0 

AE8F 



578 

DEADDA 



AEE0 

00 

00 


610 

KPCURY:DEFW 

0 

AE8F 

83 


579 


ADD 

A.E 

AEE2 

00 

A0 


611 

MAGADR:DEFW 

WRKORG 

AE90 

5F 


580 


LD 

B, A 

AEE4 

FF 

AA 


612 

MADRED:DEFW 

WRKEND 

AE91 

D0 


581 


RET 

NC 








AE92 

14 


582 


INC 

D 








AE93 

C9 


583 


RET 










AE94 

AE94 


584 

585 


WORK EREA 


'JXh7 T-'-f 97--y -fy 


X'JZ h 


0000 




1 

; ************************* 

3096 

3F 

20 






0000 




2 

; * DISK ALL COPY ROUTINE * 

3098 

00 



58 


DEFB 

0 

0000 




3 

• ************************* 

3099 

CD 

21 

20 

59 


CALL 

♦FLGET 

0000 




4 



309C 

CD 

F4 

IF 

60 


CALL 

♦PRINT 

0000 




5 

#PRINT EQU 

1FF4H 

309F 

CD 

EE 

IF 

61 


CALL 

♦ LTNL 

0000 




6 

♦MPRNT EQU 

1FE2H 

30A2 

D6 

59 


62 


SUB 

'Y’ 

0000 




7 

♦ LTNL EQU 

1FEBH 

.30A4 

B7 



63 


OR 

A 

0000 




8 

#FLGET EQU 

2021H 

30A5 

C0 



64 


RET 

NZ 

0000 




9 

*DSK EQU 

1F5DH 

30A6 




65 

DSKCP3 



0000 




10 

♦SCTRD EQU 

2000H 

30A6 

3E 

50 


66 


LD 

A, 80 

0000 




11 

#SCTVR EQU 

2003H 

30A8 

01 

10 

00 

67 


LD 

BC, 16 

0000 




12 

#ETRK EQU 

20FFH 

30AB 

11 

00 

00 

68 


LD 

DE, 0 

0000 




13 



30AE 

21 

20 

31 

69 


LD 

HL,DSKWRK 

0000 




14 

OFFSET 

0C000H-3000H 

30B1 




70 

CPLOOP 



3000 




15 

ORG 

300011 

30B1 

F5 



71 


PUSH 

AF 

3000 




16 



30B2 

3A 

IB 

31 

72 


LD 

A, (SOURDV) 

3000 




17 

DSKCPY 


30B5 

32 

5D 

IF 

73 


LD 

(♦DSK),A 

3000 

18 

IB 


18 

JR 

DBVST2 

30B8 

79 



74 


LD 

A, C 

3002 




19 

DBVSBT 


30B9 

CD 

00 

20 

75 


CALL 

♦SCTRD 

3002 

1A 



20 

LD 

A,(DB) 

30BC 

38 

5E 


76 


JR 

C.DSKERR 

3003 

B 7 



21 

OR 

A 

30BE 

3A 

IF 

31 

77 


LD 

A,(DESTDV) 

3004 

28 

17 


22 

JR 

Z.DBVST2 

30C1 

32 

5D 

IF 

78 


LD 

(♦DSK),A 

3006 

CD 

E3 

30 

23 

CALL 

GETDBV 

30C4 

79 



79 


LD 

A, C 

3009 

32 

IE 

31 

24 

LD 

(SOURDV),A 

30C5 

CD 

03 

20 

80 


CALL 

♦SCTWR 

300C 

CD 

07 

31 

25 

CALL 

CMPCLN 

30C8 

38 

52 


81 


JR 

C.DSKERR 

300F 

C2 

18 

31 

26 

JP 

NZ,SYNERR 

30CA 

EB 



82 


EX 

DE.HL 

3012 

CD 

E3 

30 

27 

CALL 

GETDEV 

„ 30CB 

09 



83 


ADD 

HL.BC 

3015 

32 

IF 

31 

28 

LD 

(DESTDV) f A 

30CC 

EB 



84 


BX 

DE.HL 

3018 

CD 

07 

31 

29 

CALL 

CMPCLN 

30CD 

FI 



85 


POP 

AF 

30 IB 

18 

54 


30 

JR 

DSKCP2 

30CE 

3D 



86 


DEC 

A 

301D 




31 

DEVST2 


30CF 

20 

E0 


87 


JR 

NZ,CPLOOP 

301D 

CD 

E2 

IF 

32 

CALL 

fMPRNT 

30D1 




88 

CPYEND 



3020 

53 

4F 

55 

33 

DEFM 

'SOURCE DEVICB ==> 

. 30D1 

CD 

E2 

IF 

89 


CALL 

♦MPRNT 

3023 

52 

43 

45 




30D4 

43 

6F 

6D 

90 


DEFM 

’Completed 

3026 

20 

20 

20 




30D7 

70 

6C 

65 





3029 

20 

20 

20 




30DA 

74 

65 

64 





302C 

44 

45 

56 




30DD 

20 

21 






302F 

49 

43 

45 




30DF 

0D 

00 


91 


DEFB 

0DH: 0 

3032 

20 

3D 

3D 




30E1 

B7 



92 


OR 

A 

3035 

3E 

20 





30E2 

C9 



93 


RET 


3037 

00 



34 

DBFB 

0 

30E3 




94 

; 



3038 

CD 

21 

20 

35 

CALL 

♦FLGET 

30E3 




95 

GETDEV 



303B 

32 

IE 

31 

36 

LD 

(SOURDV),A 

30E3 

CD 

10 

31 

96 


CALL 

SPSKIP 

303E 

CD 

F4 

IF 

37 

CALL 

♦PRINT 

30E6 

1A 



97 


LD 

A,(DE) 

3041 

CD 

EE 

IF 

38 

CALL 

ILTNL 

30E7 

13 



98 


INC 

DE 

3044 

CD 

B8 

30 

39 

CALL 

CMPDBV 

30E8 




99 

CMPDBV 



3047 

CD 

E2 

IF 

40 

CALL 

IMPRNT 

30E8 

FB 

41 


100 


CP 

'A' 

304A 

44 

45 

53 

41 

DEFM 

'DESTINATION DEVICE ==> 

» 30EA 

C8 



101 


RET 

Z 

304D 

54 

49 

4E 




30EB 

FE 

42 


102 


CP 

'B' 

3050 

41 

54 

49 




30ED 

C8 



103 


RET 

Z 

3053 

4F 

4E 

20 




30EE 

FE 

43 


104 


CP 

'C' 

3056 

44 

45 

56 




30F0 

C8 



105 


RET 

Z 

3059 

49 

43 

45 




30F1 

FE 

44 


106 


CP 

•D' 

305C 

20 

3D 

3D 




30F3 

C8 



107 


RET 

Z 

305F 

3B 

20 





30F4 

FB 

45 


108 


CP 

'E' 

3061 

00 



42 

DBFB 

0 

30F6 

20 

0B 


109 


JR 

NZ.CMPDV3 

3062 

CD 

21 

20 

43 

CALL 

IFLGET 

30F8 

F5 



110 


PUSH 

AF 

3065 

32 

IF 

31 

44 

LD 

(DBSTDV),A 

30F9 

3A 

FF 

20 

111 


LD 

A,(IETRK) 

3068 

CD 

F4 

IF 

45 

CALL 

♦PRINT 

30FC 

FE 

50 


112 


CP 

80 

306B 

CD 

BE 

IF 

46 

CALL 

♦ LTNL 

30FE 

20 

02 


113 


JR 

NZ.CMPDV2 

306E 

CD 

E8 

30 

47 

CALL 

CMPDBV 

3100 

FI 



114 


POP 

AF 

3071 




48 

DSKCP2 


3101 

C9 



115 


RET 


3071 

3A 

IE 

31 

49 

LD 

A, (SOURDV) 

3102 




116 

CMPDV2 



3074 

CD 

F4 

IF 

50 

CALL 

♦PRINT 

3102 

FI 



117 


POP 

AF 

3077 

CD 

E2 

IF 

51 

CALL 

♦MPRNT 

3103 




118 

CMPDV3 



307A 

3A 

20 

3D 

52 

DEFM 

': ==> * 

3103 

D1 



119 


POP 

DE 

307D 

3D 

3B 

20 




3104 

C3 

18 

31 

120 


JP 

SYNERR 

3080 

00 



53 

DEFB 

0 

3107 




121 

CMPCLN 



3081 

3A 

IF 

31 

54 

LD 

A,(DESTDV) 

3107 

1A 



122 


LD 

A, (DE) 

3084 

CD 

F4 

IF 

55 

CALL 

♦PRINT 

3108 

13 



123 


INC 

DE 

3087 

CD 

E2 

IF 

56 

CALL 

♦MPRNT 

3109 

FE 

3A 


124 


CP 

1 : ’ 

308A 

3A 

20 

20 

57 

DEFM 

Sure(Y/N)? » 

310B 

C8 



125 


RET 

Z 

308D 

53 

75 

72 




310C 

D1 



126 


POP 

DE 

3090 

65 

28 

59 




310D 

C3 

18 

31 

127 


JP 

SYNBRR 

3093 

2F 

4B 

29 




3110 




128 

SPSKIP 













h w ili!^ 



UKX wmts o tZ c, x U' o tz<D 









c .). jEffl- (17) (tr;nt 


JACKWRITE 121 




3110 

1A 


129 

LD 

A,(DB) 

3111 

13 


130 

INC 

DE 

3112 

FE 

20 

131 

CP 

• • 

3114 

28 

FA 

132 

JR 

Z.SPSKIP 

3116 

IB 


133 

DEC 

DE 

3117 

C9 


134 

RET 


3118 



135 

SYNERR 


3118 

3E 

0D 

136 

LD 

A, 13 

311A 

37 


137 

SCF 


31 IB 

C9 


138 

RET 



311C 


139 

DSKBRR 


311C 

Cl 

140 


POP BC 

31 ID 

C9 

141 


RET 

31 IE 


142 

SOURDV 


31 IE 

00 

143 


DEFS 1 

311F 


144 

DESTDV 


31 IF 

00 

145 


DBFS 1 

3120 


146 



3120 


147 

DSKWRK 



yxh8 -y-^y^uypy x h 


0000 

0000 

0000 


*********************** 
KAMJI PRINT SAMPLE 
1987/06/07 by K.MORI 
**«****************)**« 


I KPINIT EQU < 
r KPRINT EQU 0AB031I 
I KPCLS EQU OAB0FH 
I STS1ZE EQU 0AB1BH 
l STPICH EQU 0AB1EH 
SETW1N EQU 0ABI511 
SETDIR EQU 0AB21M 


8000 




14 

ORG 

8000H 


8000 




15 ; 




8000 

CD 

00 

AB 

16 

CALL 

KPINIT 


8003 

D8 



17 

RET 

C 


8004 

CD 

15 

AB 

18 

CALL 

SETWIN 


8007 

00 

00 

00 

19 

DEFW 

0:0:639:191 


800A 

00 

7 F 

02 





800D 

BF 

00 






8 OOF 

1 1 

20 

10 

20 

LD 

DE,1020H 

; YX 

8012 

CD 

IB 

AB 

21 

CALL 

STSIZE 


8015 

3E 

01 


22 

LD 

A, 1 


8017 

CD 

21 

AB 

23 

CALL 

SETDIR 


801A 

3E 

05 


24 

LD 

A, 05H 

; YX 

801C 

CD 

IE 

AB 

25 

CALL 

STPICH 



80 IF 
8022 
8022 

8025 

8026 
8029 
802G 
8021) 
802E 
80 2 F 
8032 

8035 

8036 
8038 
803A 
803C 
80 3 E 
8040 
804 0 
8040 
804 2 
804 1 

8045 

8046 

8048 

8049 


CD OF AB 26 

27 

DD 21 40 28 

80 

DD 56 01 29 

DD 5E 00 30 

7 A 31 

B3 

cp 

DD 46 02 

CD 03 AB 

13 

10 FA 
DD 23 
DD 23 
DD 23 
18 E6 


21 24 
53 

21 30 
5E 

21 31 
03 

00 00 


33 

34 

35 LOOP2 

36 

37 

38 

39 


LD 


OR 

RET 


42 ; 

43 DATA 


46 

47 


CALL KPCLS 
LD IX,DATA 

D, (IX+1) 

E, (1X+0) 

A, D 
E 
Z 

B, {IX+21 
CALL KPRINT 
INC DE 
DJNZ LOOP2 
INC IX 

INC IX 
INC IX 
JR LOOP! 


DEFW 2421H 
DEFB 83 
DEFW 302 111 
DEFB 94 
DEFW 3121H 
DEFB 03H 
DEFW 000011 


y X h 9 UtiWtiT—9 












8168 

00 

00 

0 0 

00 

0 0 

00 

0 0 

00 : 

: 00 

8308 

15 

54 

16 

74 

54 

85 

74 

8A 

: CA 







8170 

00 

00 

00 

0 0 

00 

0 0 

00 

00 : 

: 00 

8310 

85 

6E 

8A 

5C 

6E 

C6 

A5 

EA 

: 9C 











8178 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

8318 

C6 

00 

00 

00 

00 

00 

00 

00 

: C6 

6000 

3E 

4 1 

32 

5D 

IF 

3E 

16 

21 

: A2 











8320 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

6008 

00 

80 

11 

66 

00 

CD 

03 

20 

: E7 

SUM: 

A5 

73 

40 

3A 

02 

5D 

3A 

D1 A2EB 

8328 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

6010 

D0 

C3 

33 

20 





: E6 











8330 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 











8180 

08 

86 

65 

68 

49 

98 

68 

A9 : 

: 4D 

8338 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

SUM: 

0E 

84 

76 

E3 

IF 

0B 

19 

41 

7682 

8188 

98 

AB 

A9 

9D 

AB 

7F 

9D 

6F : 

: BF 

8340 

0E 

61 

50 

48 

61 

IE 

48 

16 

: E4 











8190 

7F 

00 

00 

00 

00 

00 

00 

00 : 

: 7F 

8348 

15 

54 

16 

74 

54 

85 

74 

8 A 

: CA 











8198 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

8350 

85 

6E 

8A 

5C 

6E 

C6 

A5 

EA 

: 9C 

# LI' £) nr — 

9 






81A0 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

8358 

C6 

D4 

C3 

E2 

D1 

00 

00 

00 

: 10 











81A8 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

8360 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 











81B0 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

8368 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

8000 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

81B8 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

8370 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

8008 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8 1C0 

0B 

71 

50 

91 

71 

73 

91 

47 : 

: 19 

8378 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8010 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

81C8 

35 

75 

47 

95 

75 

B7 

95 

BA : 

: 01 











8018 

00 

00 

00 

00 

00 

00 

00 

00 

: OO 

81D0 

B7 

AC 

BA 

7F 

AC 

6F 

7 F 

00 : 

: 36 

SUM: 

DA 

1A 

A3 

12 

17 

D2 

C2 

14 : 

20 ID 

8020 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

81D8 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 











8028 

00 

00 

00 

00 

00 

00 

00 

00 

: O0 

81E0 

00 

0 0 

00 

00 

00 

00 

0 0 

00 : 

: 00 

8380 

0E 

44 

34 

A3 

44 

38 

27 

58 

: 24 

8030 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

81E8 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

8388 

38 

B6 

58 

60 

50 

75 

60 

BB 

: 86 

8038 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

81F0 

00 

00 

00 

00 

00 

0 0 

00 

00 : 

: 00 

8390 

75 

9A 

BB 

4 A 

9A 

2B 

4 A 

2D 

: 50 

8040 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

81F8 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

8398 

2B 

3E 

2D 

AE 

3E 

00 

00 

00 

: 82 

8048 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 











83A0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8050 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

SUM: 

16 

C3 

5F 

AA 

86 

B0 

AA 

19 EDAE 

83A8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8058 

00 

00 

00 

00 

00 

0 0 

00 

00 

: O0 











83B0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8060 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8200 

07 

86 

66 

68 

49 

98 

68 

3E : 

: E2 

83B8 

00 

0 0 

00 

00 

00 

00 

00 

00 

: 00 

8068 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8208 

98 

8C 

6B 

8E 

8C 

BB 

8E 

00 : 

: F5 

83C0 

10 

44 

34 

A3 

44 

38 

27 

58 

: 26 

8070 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8210 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

83C8 

38 

B6 

58 

60 

50 

75 

60 

BB 

: 86 

8078 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8218 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

83D0 

75 

9A 

BB 

4 A 

9 A 

2B 

4A 

2D 

: 50 











8220 

00 

00 

00 

00 

0 0 

00 

00 

00 : 

: 00 

83D8 

2B 

3E 

2D 

AE 

3E 

C3 

B2 

D1 

: C8 

SUM: 

00 

00 

00 

00 

00 

00 

00 

00 

0000 

8228 

00 

00 

00 

00 

00 

00 

0 0 

00 : 

: 00 

83E0 

C0 

00 

00 

00 

00 

00 

00 

00 

: C0 











8230 

00 

0 0 

00 

00 

00 

00 

00 

00 : 

: 00 

83E8 

00 

0 0 

00 

00 

00 

00 

00 

00 

: 00 

8080 

0E 

97 

47 

6B 

65 

8D 

6B 

8B 

: 3F 

8238 

0 0 

00 

00 

00 

00 

00 

00 

0O : 

: 00 

83F0 

00 

00 

00 

00 

0 0 

00 

00 

00 

: 00 

8088 

89 

5E 

8B 

4E 

5E 

3D 

4E 

3B 

: E4 

8240 

0D 

71 

50 

91 

71 

82 

91 

26 : 

: 09 

83F8 

00 

0 0 

00 

00 

00 

00 

00 

00 

: 00 

8090 

3D 

69 

3B 

99 

69 

BB 

99 

BD 

: F4 

8248 

25 

65 

26 

95 

65 

ID 

95 

1C : 

: 78 











8098 

BB 

9F 

BD 

8F 

9F 

00 

00 

00 

: 45 

8250 

ID 

7A 

4 A 

8B 

7A 

8D 

8B 

9E : 

: 9C 

SUM: 

8E 

A4 

E8 

F6 

D8 

73 

54 

51 64B6 

80A0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8258 

8D 

DE 

9E 

00 

00 

00 

00 

00 : 

: 09 











80A8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8260 

00 

00 

00 

00 

00 

00 

0 0 

00 : 

: 00 

8400 

06 

91 

80 

46 

91 

47 

46 

8C 

07 

80B0 

00 

0 0 

00 

00 

00 

00 

00 

00 

: 00 

8268 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

8408 

47 

9E 

8C 

9 F 

9B 

00 

00 

00 

AE 

80B8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8270 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

8410 

00 

00 

00 

00 

00 

00 

00 

00 

00 

80C0 

12 

34 

23 

64 

34 

B2 

64 

61 

: 78 

8278 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

8418 

0 0 

00 

00 

00 

00 

00 

00 

00 

00 

80C8 

50 

55 

61 

58 

55 

6C 

58 

88 

: FF 











8420 

0 0 

00 

00 

00 

00 

00 

00 

00 

00 

80D0 

86 

4D 

88 

2D 

4 D 

1C 

2D 

19 

: 37 

SUM: 

7B 

40 

2F 

A7 

25 

82 

A7 

IE 3C94 

8428 

0 0 

0 0 

00 

00 

00 

00 

0 0 

00 

00 

80D8 

1C 

56 

19 

86 

56 

C8 

86 

CC 

: 81 











8430 

00 

00 

00 

00 

00 

00 

00 

00 

00 

80E0 

C8 

AE 

CC 

7E 

AE 

00 

00 

00 

: 6E 

8280 

0C 

88 

38 

6F 

66 

3D 

6F 

3C 

89 

8438 

00 

00 

00 

00 

00 

00 

00 

00 

00 

80E8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8288 

3D 

5A 

3C 

9A 

5A 

BC 

9A 

BD 

DA 

8440 

0 A 

91 

80 

46 

91 

47 

46 

8C 

0B 

80F0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8290 

BC 

AE 

BO 

9E 

AE 

8D 

9E 

B8 

56 

8448 

47 

9E 

8C 

9F 

9E 

A5 

94 

A6 

8D 

80F8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8298 

A7 

00 

00 

00 

00 

00 

00 

00 

A7 

8450 

A5 

C3 

B2 

C4 

C3 

00 

00 

00 

AI 











82A0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8458 

00 

00 

00 

00 

00 

00 

00 

00 

00 

SUM: 

5B 

D7 

BB 

CE 

A5 

87 

Cl 

51 

FF03 

82A8 

00 

00 

00 

00 

00 

00 

0 0 

00 

00 

8460 

00 

00 

00 

00 

00 

00 

00 

00 

00 











82B0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8468 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8100 

05 

3B 

37 

5E 

3B 

6D 

5E 

BA 

: 95 

82B8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8470 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8108 

A8 

BC 

BA 

00 

00 

00 

00 

00 

: IE 

82C0 

10 

25 

14 

35 

25 

74 

35 

50 

9C 

8478 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8110 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

82C8 

40 

5F 

50 

3D 

5F 

ID 

3D 

97 

7C 











8118 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

82D0 

ID 

A7 

97 

C9 

A7 

CB 

C9 

AD 

0C 

SUM: 

43 

21 

CA 

8E 

21 

33 

20 

BE 6EBF 

8120 

00 

00 

00 

0 

0 0 

00 

00 

00 

: 00 

82D8 

CB 

8D 

AD 

7C 

8D 

B3 

A3 

D5 

39 











8128 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

82E0 

B3 

00 

00 

00 

00 

00 

00 

00 

B3 

8480 

0C 

23 

12 

18 

23 

1A 

18 

2D 

: DB 

8130 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

82E8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8488 

1A 

39 

2D 

86 

66 

D4 

86 

A2 

: 68 

8138 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

82F0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8490 

90 

AB 

A2 

9D 

AB 

7F 

9D 

6F 

: B0 

8140 

08 

23 

12 

17 

23 

19 

17 

3D 

: E4 

82F8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8498 

7F 

00 

00 

00 

00 

00 

00 

00 

: 7F 

8148 

19 

59 

3D 

C5 

A4 

D7 

C5 

DA 

: 8E 











84A0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8150 

D7 

00 

00 

00 

00 

00 

00 

00 

: D7 

SUM: 

97 

48 

D9 

5E 

26 

95 

85 

1A C09F 

84A8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8158 

00 

00 

00 

00 

00 

00 

00 

00 

; 00 











84B0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8160 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8300 

0C 

61 

50 

48 

61 

IE 

48 

16 

: E2 

84B8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 
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HE SENTINEL 


84C0 

0E 

23 

12 

18 

23 

1A 

18 

2D 

: DD 

84C8 

1A 

39 

2D 

86 

66 

D4 

86 

A2 

: 68 

84D0 

90 

AB 

A2 

9D 

AB 

7 F 

9D 

6F 

: BO 

84D8 

7F 

C2 

B 1 

El 

D0 

00 

00 

00 

: A3 

84E0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

84E8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

84 F0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

84 F8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

SUM: 

6C 

D0 

73 

57 

38 

DA 

76 

7 C 

E571 

8500 

08 

53 

42 

A3 

53 

75 

A3 

2A 

: D5 

8508 

29 

3C 

2A 

5D 

3C 

BD 

5D 

AC 

: EE 

8510 

BD 

00 

00 

00 

00 

00 

00 

00 

: BD 

8518 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8520 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8528 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8530 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8538 

0 0 

00 

00 

00 

00 

00 

00 

00 

: 00 

8540 

0A 

53 

42 

A3 

53 

75 

A3 

2A 

: D7 

8548 

29 

3C 

2A 

5D 

3C 

BD 

5D 

AC 

: EE 

8550 

BD 

C2 

B1 

El 

D0 

00 

00 

00 

: El 

8558 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8560 

00 

00 

00 

00 

00 

00 

0 0 

00 

: 00 

8568 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8570 

00 

00 

0 0 

00 

00 

00 

00 

00 

: 00 

8578 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

SUM: 

DE 

E0 

89 

El 

EE 

64 

00 

AC 

D886 

8580 

0C 

35 

24 

75 

35 

C3 

75 

71 

: B8 

8588 

61 

74 

71 

BA 

74 

A9 

BA 

59 

: 30 

8590 

A9 

3 A 

59 

3C 

3A 

5E 

3C 

AE 

: FA 

8598 

5E 

00 

00 

00 

00 

00 

00 

00 

: 5E 

85A0 

00 

00 

00 

0 0 

00 

00 

00 

00 

: 00 

85A8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

85B0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

85B8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

85C0 

0E 

35 

24 

75 

35 

A3 

75 

61 

: 8A 

85C8 

51 

64 

61 

BA 

64 

99 

BA 

49 

: D0 

85D0 

99 

2A 

49 

2C 

2 A 

4E 

2C 

AE 

: 8A 

85D8 

4 B 

C2 

B1 

El 

D0 

00 

00 

00 

: 72 

85E0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

85E8 

00 

00 

00 

00 

0 0 

00 

00 

0 0 

: 00 

85F0 

00 

00 

0 0 

00 

00 

00 

00 

00 

: 00 

85F8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

SUM: 

BA 

68 

6D 

A7 

76 

54 

C6 

D0 

F495 

8600 

08 

51 

30 

41 

51 

4B 

41 

5D 

: 04 

8608 

4B 

7E 

5D 

9E 

7E 

DA 

9E 

D9 

: 93 

8610 

DA 

00 

00 

00 

00 

00 

00 

00 

: DA 

8618 

00 

00 

00 

00 

00 

0 0 

00 

00 

: 00 

8620 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8628 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8630 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8638 

0 0 

0 0 

00 

00 

00 

00 

00 

00 

: 00 

8640 

0C 

51 

30 

41 

51 

4B 

41 

5D 

: 08 

8648 

4B 

7E 

5D 

9E 

7E 

DA 

9E 

D9 

: 93 

8650 

DA 

A4 

93 

A5 

A4 

C3 

B2 

C4 

: 93 

8658 

C3 

0 0 

00 

0 0 

00 

00 

00 

00 

: C3 

8660 

00 

0 0 

00 

00 

00 

00 

00 

00 

: 00 

8668 

00 

0 0 

00 

00 

00 

00 

00 

00 

: 00 

8670 

00 

00 

00 

00 

00 

00 

0 0 

00 

: 00 

8678 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

SUM: 

21 

42 

AD 

63 

42 

0D 

70 

30 

7756 

8680 

10 

14 

03 

E3 

14 

D2 

E3 

80 

: 53 

8688 

70 

89 

80 

7A 

89 

5A 

7 A 

49 

: 99 

8690 

5A 

47 

49 

56 

47 

76 

56 

87 

: DA 

8698 

76 

8B 

89 

7D 

8B 

5F 

7D 

4F 

: BD 

86A0 

5F 

00 

00 

00 

00 

00 

00 

00 

: 5F 

86A8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

86B0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

86B8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

86C0 

12 

14 

03 

E3 

14 

D2 

S3 

80 

: 55 

86C8 

70 

89 

80 

7A 

89 

5A 

7A 

49 

: 99 

86D0 

5 A 

47 

49 

56 

47 

76 

56 

87 

: DA 

86D8 

76 

8B 

89 

7D 

8B 

5F 

7D 

4F 

: BD 

86E0 

5F 

B 1 

A0 

D0 

El 

00 

00 

00 

: 61 

86E8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

86F0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

86F8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

SUM: 

60 

8F 

4 A 

30 

BF 

02 

60 

3E 

6EBC 

8700 

09 

17 

06 

E5 

17 

43 

32 

4D 

: E4 

8708 

43 

5E 

4D 

BE 

5E 

9B 

8A 

A2 

: D1 

8710 

9B 

91 

A2 

00 

00 

00 

00 

00 

: CE 

8718 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8720 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8728 

00 

00 

00 

00 

00 

00 

0 0 

00 

: 00 

8730 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8738 

00 

00 

00 

00 

00 

00 

00 

0 0 

: 00 

8740 

0B 

17 

06 

E5 

17 

43 

32 

4D 

: E6 

8748 

43 

5E 

4D 

BE 

5E 

9B 

8A 

A2 

: D1 

8750 

9 B 

91 

A2 

D3 

C2 

D0 

El 

00 

: 14 

8758 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8760 

0 0 

00 

00 

00 

00 

00 

00 

00 

: 00 

8768 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8770 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8778 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

SUM: 

DO 

0C 

EA 

19 

AC 

8C 

59 

DE 

528A 

8780 

0A 

52 

41 

91 

52 

A2 

91 

36 

: E9 


8788 

A2 

19 

36 

D6 

19 

79 

97 

6B 

: 5B 

8790 

79 

7D 

6B 

BE 

7D 

00 

00 

00 

: 9C 

8798 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

87A0 

00 

00 

00 

00 

00 

00 

00 

00 

: 0O 

87A8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

87B0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

87B8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

87C0 

0C 

52 

41 

91 

52 

A2 

9 1 

36 

: EB 

87C8 

A2 

19 

36 

D6 

19 

79 

97 

6B 

: 5B 

87D0 

79 

7D 

6B 

BE 

71) 

D3 

C2 

El 

: 12 

87D8 

DO 

00 

00 

00 

00 

00 

00 

00 

: D0 

87 E0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

87E8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

87F0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

87F8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

SUM: 

1C 

D0 

C4 

4 A 

D0 

09 

12 

23 

1C4 1 

8800 

09 

74 

15 

51 

41 

IE 

51 

A5 

: 38 

8808 

86 

C5 

A5 

A7 

C5 

7D 

7 A 

8E 

: El 

8810 

7D 

DF. 

8E 

00 

00 

00 

00 

00 

: E9 

8818 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8820 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8828 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8830 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8838 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8840 

0C 

74 

15 

51 

4 1 

IE 

51 

A5 

: 3B 

8848 

86 

C5 

A5 

A7 

C5 

7 D 

7A 

8E 

: El 

8850 

7D 

DE 

8E 

C2 

B1 

C3 

C2 

El 

: C2 

8858 

D0 

00 

00 

00 

00 

00 

00 

00 

: D0 

8860 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8868 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8870 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8878 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

SUM: 

EB 

2E 

90 

B2 

BD 

F9 

58 

47 

7 3C6 

8880 

0B 

34 

23 

A2 

34 

60 

50 

4A 

: 32 

8888 

60 

59 

4 A 

97 

59 

B7 

97 

D9 

: 1A 

8890 

B7 

DB 

D9 

AE 

DB 

6E 

AE 

00 

: 10 

8898 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

88A0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

88A8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

88B0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

88B8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

88C0 

0D 

34 

23 

A2 

34 

60 

50 

4A 

: 34 

88C8 

60 

59 

4 A 

97 

59 

B7 

97 

D9 

: 1A 

88D0 

B7 

DB 

D9 

AE 

DB 

6E 

AE 

D4 

: E4 

88D8 

C3 

E2 

D1 

00 

00 

00 

00 

00 

: 76 

88E0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

88E8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

88F0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

88F8 

00 

0 0 

00 

00 

00 

00 

00 

00 

: 00 

SUM: 

09 

B2 

5D 

CE 

D0 

0A 

2A 

1A 

B6D5 

8900 

05 

A8 

29 

B9 

A8 

BB 

B9 

8E 

: 39 

8908 

BB 

5F 

8E 

00 

00 

00 

00 

00 

: A8 

8910 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8918 

00 

00 

00 

00 

00 

00 

0 0 

00 

: 00 

8920 

00 

00 

00 

00 

00 

0 0 

00 

00 

: 00 

8928 

1)0 

00 

00 

00 

00 

00 

00 

0 0 

: 00 

8930 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8938 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8940 

07 

15 

04 

93 

15 

B3 

93 

D5 

: E3 

8948 

B3 

D9 

D5 

8C 

D9 

6C 

8C 

00 

: BE 

8950 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8958 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8960 

0 0 

00 

00 

00 

00 

00 

00 

0 0 

: 00 

8968 

00 

0 0 

00 

00 

00 

00 

00 

00 

: 00 

8970 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8978 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

SUM: 

7A 

F5 

90 

D8 

96 

DA 

D8 

63 

3579 

8980 

09 

16 

05 

94 

16 

B4 

94 

D6 

: EC 

8988 

B4 

DA 

D6 

8D 

DA 

6D 

8D 

C3 

: 88 

8990 

B2 

E2 

D1 

00 

00 

00 

00 

00 

: 65 

8998 

00 

00 

00 

0 0 

00 

1)0 

00 

0 0 

: 00 

89A0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

89A8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

89B0 

00 

00 

00 

00 

0 0 

00 

00 

0 0 

: 00 

89B8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

89C0 

09 

14 

03 

92 

14 

D2 

92 

83 

: AD 

89C8 

C2 

56 

83 

48 

56 

4B 

48 

6D 

: 39 

89D0 

4B 

BD 

6D 

00 

00 

00 

00 

00 

: 75 

89D8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

89E0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

89E8 

00 

00 

0 0 

00 

00 

00 

00 

00 

: 00 

89F0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

89F8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

SUM: 

85 

F9 

9F 

FB 

5A 

3E 

FB 

89 

14B1 

8A0O 

0B 

14 

03 

92 

14 

D2 

92 

83 

: AF 

8A08 

C2 

56 

83 

48 

56 

4B 

48 

6D 

: 39 

8A10 

4B 

BD 

6D 

B7 

A6 

D5 

C4 

00 

: 6B 

8A18 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8A20 

00 

00 

00 

00 

00 

00 

00 

0 0 

: 00 

8A28 

00 

00 

00 

00 

0 0 

0 0 

00 

00 

: 00 

8A30 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8A38 

0 0 

00 

00 

00 

00 

00 

00 

00 

: 00 

8A40 

09 

60 

50 

65 

60 

77 

65 

57 

: B1 

8A48 

B6 

2A 

5 7 

2C 

2A 

4 E 

2C 

9E 

: A5 

8A50 

4E 

CD 

9E 

00 

00 

00 

00 

00 

: B9 

8A58 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8A60 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 


8A68 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8A70 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8A78 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

SUM: 

25 

7E 

38 

22 

9A 

B7 

2F 

E5 683D 

8A80 

0B 

60 

50 

65 

60 

77 

65 

57 

B3 

8A88 

B6 

2A 

57 

2C 

2A 

4E 

2C 

9E 

A5 

8A90 

4E 

CD 

9E 

B3 

A2 

D2 

Cl 

00 

A1 

8A98 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8AA0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8AA8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8AB0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8AB8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8AC0 

0E 

63 

14 

2B 

50 

B2 

92 

D4 

18 

8AC8 

B2 

B4 

C3 

AB 

95 

AD 

AB 

9E 

5F 

8 AD0 

AD 

7E 

9E 

6D 

7E 

6C 

6D 

7B 

08 

8AD8 

6C 

BB 

7 B 

DD 

BB 

00 

00 

00 

3A 

8AE0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8AE8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8AF0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8AF8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

SUM: 

E8 

A7 

35 

64 

4 A 

62 

FC 

E2 8B6C 

8B00 

0B 

23 

12 

19 

23 

2E 

19 

3A 

: FD 

8B08 

2E 

74 

63 

93 

74 

C3 

93 

A 4 

: 06 

8B10 

C3 

6B 

69 

8D 

6 B 

DD 

8D 

00 

: F9 

8B18 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8B20 

00 

00 

00 

00 

00 

00 

00 

00 

: 0Q 

8B28 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8B30 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8B38 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8B40 

18 

36 

22 

48 

36 

6B 

48 

81 

: 22 

8B4 8 

71 

75 

81 

4C 

75 

3D 

4C 

2D 

: DE 

8B50 

3D 

IB 

2D 

19 

IB 

27 

19 

55 

: 4E 

8B58 

27 

74 

55 

B4 

74 

D6 

B4 

D9 

: 7B 

8B60 

D6 

CC 

D9 

BD 

CC 

9D 

BD 

8C 

: EA 

8B68 

9D 

8B 

8C 

9A 

8B 

AA 

9A 

ED 

: 0A 

8B70 

AA 

00 

00 

00 

00 

00 

00 

00 

: AA 

8B7 8 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

SUM: 

06 

93 

68 

FI 

93 

BA 

FI 

33 5787 

8B80 

1 1 

41 

31 

4E 

41 

3D 

4E 

35 : 

: D2 

8B88 

15 

54 

35 

ID 

54 

93 

38 

B3 : 

: 8D 

8B90 

93 

C4 

B3 

CC 

C4 

BD 

CC 

8D 

: B0 

8B98 

BD 

7C 

8D 

7B 

7C 

8A 

7B 

AA 

: 6C 

8BA0 

8A 

DD 

AA 

00 

00 

00 

00 

00 

: 11 

8BA8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8BB0 

00 

00 

00 

00 

0 0 

00 

00 

00 : 

: 00 

8BB8 

0 0 

00 

00 

00 

0 0 

00 

00 

00 : 

: 00 

8BC0 

10 

67 

74 

3C 

67 

2C 

3C 

IB : 

: 11 

8BC8 

2C 

18 

IB 

25 

18 

52 

25 

92 : 

: A5 

8BD0 

52 

B3 

92 

C4 

B3 

D6 

C4 

D9 : 

: 81 

8BD8 

D6 

CB 

D9 

BC 

CB 

9D 

BC 

7D : 

: D7 

8BE0 

9D 

00 

00 

00 

00 

00 

00 

00 

: 9D 

8BE8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8BF0 

00 

0 0 

00 

00 

0 0 

0 0 

00 

00 

: 00 

8BF8 

0 0 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

SUM: 

01 

AF 

4 A 

93 

D2 

08 

AE 

22 B81A 

8C00 

10 

23 

12 

19 

23 

2E 

19 

3 A 

02 

8C08 

2E 

65 

54 

A5 

65 

D4 

A5 

A1 

0B 

8C10 

91 

AD 

A 1 

9E 

AD 

7E 

9E 

6D 

B3 

8C18 

7E 

6C 

6D 

7B 

6C 

9B 

7B 

DD 

31 

8C20 

9B 

00 

00 

00 

00 

00 

00 

00 

9B 

8C28 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8C30 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8C38 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8C4 0 

12 

23 

12 

19 

23 

2E 

19 

3A 

04 

8C48 

2E 

65 

54 

A5 

65 

D4 

A5 

A1 

0B 

8C50 

91 

AD 

A1 

9E 

AD 

7E 

9E 

6D 

B3 

8C58 

7E 

6C 

6D 

7B 

6C 

9B 

7B 

DD 

31 

8C60 

9B 

C2 

Cl 

E2 

El 

00 

00 

00 

El 

8C68 

00 

00 

00 

00 

0 0 

00 

00 

00 

00 

8C70 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8C78 

00 

00 

00 

00 

00 

00 

0 0 

00 

00 

SUM: 

D2 

04 

A9 

90 

23 

36 

AE 

4A B57D 

8C80 

14 

23 

12 

19 

23 

2E 

19 

3A : 

: 06 

8C88 

2E 

65 

54 

A5 

65 

D4 

A5 

A1 : 

: 0B 

8C90 

91 

AD 

A1 

9E 

AD 

7E 

9E 

6D : 

: B3 

8C98 

7E 

6C 

6D 

7B 

6C 

9B 

7B 

DD : 

; 31 

8CA0 

9B 

E0 

E2 

C0 

E0 

C2 

C0 

E2 : 

: 61 

8CA8 

C2 

00 

00 

00 

00 

00 

00 

00 : 

C2 

8CB0 

00 

00 

00 

00 

00 

00 

00 

00 : 

00 

8CB8 

00 

00 

00 

00 

00 

00 

00 

00 : 

00 

8CC0 

0A 

62 

13 

35 

62 

27 

35 

2C : 

9E 

8CC8 

27 

4 E 

2C 

7E 

4E 

AB 

7E 

A4 ; 

: 3A 

8CD0 

AB 

A4 

91 

D8 

A4 

00 

00 

00 

: 5C 

8CD8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8CE0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8CE8 

00 

00 

00 

00 

00 

00 

0 0 

00 

: 00 

8CF0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8CF8 

00 

00 

00 

00 

00 

00 

00 

00 

: 0O 

SUM: 

8A 

D5 

26 

22 

D5 

AF 

4A 

D7 666E 

8D00 

0D 

62 

13 

35 

62 

27 

35 

2C 

: A1 

8D08 

27 

4E 

2C 

7E 

4E 

AB 

7E 

A4 

: 3A 

8D10 

AB 

A4 

91 

D8 

A4 

C2 

B1 

C3 

: 92 

8D18 

C2 

El 

D0 

00 

00 

00 

00 

00 

: 73 

8D20 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8D28 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 


► miift 0, r H «*(.**& K • &-hiifiAliMCi: ft 1 SJS*j i i> ? NEC *» t 

TUf^u^o-cuot nii^o stra -jm (17) iMm 


JACKWRITE i2J 





















8D30 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8D38 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8D40 

0E 

62 

13 

35 

62 

27 

35 

2C 

: A2 

81)48 

27 

4 E 

2C 

7E 

4E 

AB 

7E 

A 4 

: 3A 

81)50 

AB 

A4 

91 

D8 

A4 

El 

E3 

Cl 

: El 

81)58 

El 

C3 

Cl 

E3 

C3 

00 

00 

00 

: OB 

8D60 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8D68 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

81)70 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8D7 8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

SUM: 

62 

4C 

31 

F9 

6B 

47 

FA 

24 4E73 

8D80 

0C 

93 

61 

64 

93 

55 

64 

57 

07 

8D88 

55 

8A 

57 

8C 

8A 

7 D 

8C 

5D 

B2 

81)90 

71) 

ID 

4A 

0C 

ID 

B9 

98 

DC 

3A 

8D98 

B9 

00 

00 

00 

00 

00 

00 

00 

B9 

8DA0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8DA8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8DB0 

00 

00 

00 

00 

0 0 

00 

00 

00 

00 

8DB8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8DC0 

10 

93 

61 

64 

93 

55 

64 

57 

0B 

8DC8 

55 

8A 

57 

8C 

8A 

7D 

8C 

5D 

B2 

8DD0 

7D 

ID 

4A 

0C 

ID 

B9 

98 

DC 

3A 

8DD8 

B9 

C5 

B5 

D6 

C5 

D3 

C3 

E4 

48 

8DE0 

D3 

00 

00 

00 

00 

00 

00 

00 

D3 

8DE8 

00 

00 

00 

00 

00 

00 

0 0 

00 

00 

8DF0 

00 

00 

00 

0 0 

00 

00 

00 

00 

00 

8DF8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

SUM: 

05 

39 

B9 

CE 

39 

E9 

D3 

04 C4FC 

8E00 

10 

93 

61 

64 

93 

55 

64 

57 

0B 

8E08 

55 

8A 

57 

8C 

8A 

7D 

8C 

5D 

B2 

8E10 

7D 

ID 

4A 

0C 

ID 

B9 

98 

DC 

3A 

8E18 

B9 

D3 

D5 

B3 

D3 

B5 

B3 

D5 

24 

8E20 

B5 

00 

00 

00 

00 

00 

00 

00 

B5 

8E28 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8E30 

00 

0 0 

00 

0 0 

00 

00 

00 

00 

00 

8E38 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8E40 

05 

18 

07 

54 

18 

64 

54 

B9 

01 

8E48 

64 

EA 

B9 

00 

00 

00 

00 

00 

07 

8E50 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8E58 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8E60 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8E68 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8E70 

0 0 

00 

00 

00 

00 

00 

0 0 

00 

00 

8E78 

00 

00 

00 

00 

00 

00 

00 

00 

00 

SUM: 

B9 

0F 

97 

03 

25 

A4 

8F 

IE 6749 

8E80 

08 

18 

07 

54 

18 

64 

54 

B9 

04 

8E88 

64 

EA 

B9 

C6 

B5 

C3 

B3 

D4 

CC 

8E90 

C3 

00 

00 

00 

00 

00 

00 

00 

C3 

8E98 

0 0 

00 

00 

00 

00 

0 0 

0 0 

00 

00 

8EA0 

00 

00 

00 

00 

00 

0 0 

00 

00 

00 

8EA8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8EB0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8EB8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8EC0 

09 

18 

07 

54 

18 

64 

54 

B9 

05 

8EC8 

64 

EA 

B9 

D3 

D5 

B3 

D3 

B5 

EA 

8ED0 

B3 

D5 

B5 

00 

00 

00 

00 

00 

3D 

8ED8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8EE0 

0 0 

00 

00 

00 

00 

00 

00 

00 

00 

8EE8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8EF0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8EF8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

SUM: 

4F 

D9 

35 

41 

BA 

3E 

2E 

FB F03D 

8F00 

11 

23 

12 

19 

23 

2 B 

19 

3A 

03 

8F08 

2E 

66 

55 

86 

66 

D4 

86 

A2 

D1 

8F10 

72 

Cl 

A2 

AD 

A2 

9E 

AD 

7E 

ED 

8F18 

9E 

6D 

7E 

6C 

6D 

7B 

6C 

AB 

F4 

8F20 

7B 

DE 

AB 

00 

00 

00 

00 

00 

04 

8F28 

00 

00 

00 

00 

00 

0 0 

00 

00 

00 

8F30 

00 

00 

0 0 

00 

00 

0 0 

00 

00 

00 

8F38 

00 

00 

00 

00 

00 

0 0 

0 0 

00 

00 

8F40 

13 

23 

12 

19 

23 

2E 

19 

3A 

05 

8F48 

2E 

66 

55 

96 

66 

C4 

96 

A2 

El 

8F50 

72 

B1 

A2 

AD 

A2 

9E 

AD 

7E 

DD 

8F58 

9E 

6D 

7E 

6C 

6D 

7B 

6C 

AB 

F4 

8F60 

7 B 

DE 

AB 

E4 

D3 

El 

D0 

00 

6C 

8F68 

00 

0 0 

00 

00 

00 

00 

00 

00 

00 

8F70 

00 

00 

00 

00 

00 

00 

00 

00 

00 

8F78 

00 

00 

00 

00 

00 

00 

00 

00 

00 

SUM: 

96 

1A 

64 

64 

03 

07 

50 

0A 4D8C 

8F80 

15 

23 

12 

19 

23 

2E 

19 

3A 

: 07 

8F88 

2E 

66 

55 

86 

66 

D4 

86 

A2 

: D1 

8F90 

72 

Cl 

A2 

AD 

A2 

9E 

AD 

7E 

: ED 

8F98 

9E 

6D 

7E 

6C 

6D 

7B 

6C 

AB 

: F4 

8FA0 

7B 

DE 

AB 

E0 

E2 

C0 

E0 

C2 

: 28 

8FA8 

C0 

E2 

C2 

00 

00 

00 

00 

00 

: 64 

8FB0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8FB8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8FC0 

12 

24 

13 

84 

24 

B3 

84 

37 

: 5F 

8FC8 

46 

48 

37 

88 

48 

B7 

88 

80 

: 54 

8FD0 

70 

74 

80 

7D 

74 

6E 

7D 

4E 

: 8E 

8FD8 

6E 

3D 

4E 

3C 

3D 

4B 

3C 

6B 

: 64 

8FE0 

4B 

9C 

6B 

BE 

9C 

00 

00 

00 

: AC 

8FE8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8FF0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

8FF8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 


SUM: 

0F 

30 

77 

IB 

33 

FE 

5D 

37. 387B 

9000 

10 

71 

32 

4 A 

71 

3B 

4 A 

2B 

: IE 

9008 

3B 

1A 

2B 

19 

1 A 

28 

19 

57 : 

: 4 B 

9010 

28 

77 

57 

A8 

77 

DA 

A8 

B5 

: 4C 

9018 

A5 

B8 

B5 

AB 

B8 

7E 

AB 

6E : 

: OC 

9020 

7 E 

0 0 

00 

00 

00 

00 

00 

00 : 

: 7 E 

9028 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

9030 

00 

00 

00 

00 

00 

00 

00 

00 ; 

: 00 

9038 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

9040 

11 

73 

14 

50 

40 

47 

50 

3B : 

: FA 

9048 

47 

3D 

3B 

4 E 

3D 

9E 

4 E 

BD : 

: F3 

9050 

9E 

B9 

BD 

27 

47 

18 

27 

1A : 

: DB 

9058 

18 

2B 

1A 

3B 

2B 

C3> 

B3 

E5 : 

; IE 

9060 

C3 

E6 

E5 

00 

00 

00 

00 

00 : 

: 8E 

9068 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

9070 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

9078 

00 

00 

00 

00 

00 

00 

00 

00 : 

00 

SUM: 

67 

34 

74 

B6 

A9 

7B 

2E 

9C 9B76 

9080 

10 

22 

12 

48 

22 

6B 

48 

91 : 

: F2 

9088 

80 

69 

91 

3C 

69 

2C 

3C 

IB : 

A2 

9090 

2C 

18 

IB 

36 

18 

64 

36 

A4 : 

: EB 

9098 

64 

D7 

A4 

DA 

D7 

AD 

DA 

8D : 

: A 4 

90A0 

AD 

00 

00 

00 

00 

00 

00 

00 : 

: AD 

90A8 

0 0 

00 

00 

00 

00 

00 

00 

00 : 

00 

90B0 

00 

00 

00 

00 

00 

00 

00 

00 : 

00 

90B8 

00 

00 

00 

00 

00 

00 

00 

00 : 

00 

90C0 

0C 

60 

50 

5D 

60 

6E 

5D 

BE : 

02 

90C8 

6E 

CD 

BE 

CA 

CD 

97 

CA 

74 : 

65 

90D0 

34 

46 

74 

29 

28 

3A 

29 

7 A : 

1C 

90D8 

3A 

00 

00 

00 

00 

00 

00 

00 : 

3A 

90E0 

00 

00 

00 

0 0 

00 

00 

00 

00 : 

00 

90E8 

00 

00 

00 

00 

00 

00 

00 

00 : 

00 

90F0 

00 

00 

00 

0 0 

00 

00 

00 

00 : 

00 

90F8 

0 0 

00 

00 

00 

00 

00 

00 

00 : 

00 

SUM: 

B5 

ED 

E4 

E4 

CF 

E7 

E4 

89 5E0F 

9100 

0B 

47 

29 

A6 

47 

B7 

A6 

BA : 

7F 

9108 

B7 

9C 

BA 

8C 

9C 

7B 

8C 

86 : 

C2 

9110 

88 

64 

86 

5B 

35 

5E 

5B 

00 : 

BB 

9118 

00 

00 

00 

00 

60 

00 

00 

00 : 

00 

9120 

00 

00 

00 

00 

00 

00 

00 

00 : 

00 

9128 

00 

00 

00 

0 0 

00 

00 

0 0 

00 : 

00 

9130 

00 

0 0 

00 

00 

00 

00 

00 

00 : 

00 

9138 

00 

00 

00 

00 

00 

00 

00 

00 : 

00 

9140 

0D 

17 

06 

93 

17 

B3 

93 

D5 : 

: EF 

9148 

B3 

D7 

D5 

B9 

D7 

89 

B9 

78 : 

A9 

9150 

89 

71 

93 

61 

71 

33 

42 

7C : 

: 50 

9158 

33 

7E 

7C 

00 

00 

00 

00 

00 : 

2D 

9160 

00 

00 

00 

00 

0 0 

0 0 

0 0 

00 : 

00 

9168 

00 

00 

00 

00 

00 

00 

00 

00 : 

00 

9170 

00 

0 0 

00 

00 

00 

00 

00 

00 : 

: 00 

9178 

00 

00 

00 

00 

00 

0 0 

0 0 

00 : 

00 

SUM: 

C6 

24 

53 

3A 

77 

FF 

IB 

09 EF92 

9180 

0A 

3C 

35 

76 

3A 

A6 

76 

C8 : 

0F 

9188 

A6 

CA 

C8 

AC 

CA 

7 G 

AC 

6B : 

: 41 

9190 

7C 

8D 

84 

6F 

8D 

00 

00 

00 : 

; 89 

9198 

00 

00 

00 

00 

00 

00 

00 

00 : 

00 

91A0 

00 

0 0 

00 

00 

00 

00 

00 

00 : 

: 00 

91A8 

00 

00 

00 

00 

00 

00 

00 

00 : 

; 00 

91B0 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

91B8 

00 

00 

00 

00 

00 

00 

00 

00 : 

00 

9 1C0 

13 

24 

13 

17 

24 

1A 

17 

2C : 

: E2 

91C8 

1A 

47 

2C 

74 

47 

93 

74 

B3 : 

02 

9 1D0 

93 

D5 

B3 

D9 

D5 

BB 

D9 

7B j 

: D8 

91D8 

BB 

6A 

7B 

69 

6A 

81 

71 

92 : 

: F7 

91E0 

81 

9C 

92 

7E 

9C 

5E 

7 E 

00 : 

: A5 

9 1E8 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

91F0 

0 0 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

91F8 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

SUM: 

28 

D9 

80 

DC 

D7 

69 

75 

IF 15A2 

9200 

0A 

7 D 

74 

6E 

7D 

4E 

6E 

3D : 

; DF 

9208 

4E 

3C 

3D 

4B 

3C 

6B 

4B 

9C : 

: A0 

9210 

6B 

AD 

9C 

77 

A7 

00 

00 

00 : 

: D2 

9218 

00 

00 

00 

00 

00 

0 0 

00 

00 : 

: 00 

9220 

00 

00 

00 

0 0 

no 

00 

00 

00 : 

: 00 

9228 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

9230 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

9238 

00 

00 

00 

00 

00 

00 

00 

.00 : 

: 00 

9240 

0B 

71 

61 

7D 

71 

6E 

7D 

3E : 

: F4 

9248 

6E 

1C 

3E 

2B 

1C 

6B 

2B 

9C : 

: 41 

9250 

6B 

CE 

9C 

A5 

B4 

75 

A5 

00 : 

: 48 

9258 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

9260 

00 

00 

00 

00 

00 

00 

0 0 

00 : 

: 00 

9268 

00 

00 

00 

00 

00 

00 

00 

00 : 

; 00 

9270 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

9278 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

SUM: 

A7 

Cl 

88 

7D 

A1 

07 

06 

B3 3648 

9280 

0C 

92 

50 

73 

92 

37 

45 

3B 

AA 

9288 

37 

68 

3B 

87 

68 

A7 

87 

C9 

C0 

9290 

A7 

GB 

C9 

AD 

CB 

8E 

AD 

6E 

5C 

9298 

8E 

00 

00 

00 

00 

00 

00 

00 

8E 

92A0 

00 

00 

00 

00 

00 

0 0 

00 

00 

00 

92A8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

92B0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

92B8 

00 

00 

00 

00 

00 

00 

00 

00 

00 


92C0 

0C 

42 

31 

35 

42 

39 

35 

4 B 

: AF 

92C8 

39 

64 

4B 

73 

64 

93 

73 

B5 

: 7 A 

92D0 

93 

BA 

B5 

AC 

BA 

8E 

AC 

5F 

: 01 

92D8 

8E 

00 

00 

00 

00 

00 

00 

00 

: 8E 

92E0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

92E8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

92F0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

92F8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

SUM: 

DE 

25 

85 

FB 

25 

C6 

CD 

D 1 

C32 1 

9300 

10 

91 

42 

A2 

91 

2A 

A2 

2B 

: 0D 

9308 

2A 

58 

2B 

87 

58 

A7 

87 

C9 

: 83 

9310 

A7 

CC 

C9 

AE 

CC 

6E 

AE 

5D 

: 2F 

9318 

6E 

5C 

5D 

6B 

5C 

7B 

6B 

8C 

: 60 

9320 

7B 

00 

00 

00 

00 

00 

00 

00 

: 7B 

9328 

00 

00 

00 

0 0 

0 0 

00 

00 

00 

: 00 

9330 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

9338 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

9340 

0C 

41 

30 

4E 

41 

3D 

4E 

53 

: EA 

9348 

15 

1C 

53 

83 

29 

A3 

83 

B4 

: 0A 

9350 

A3 

AC 

B4 

BD 

AC 

CD 

BD 

EB 

: El 

9358 

CD 

00 

00 

00 

00 

00 

00 

0 0 

: CD 

9360 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

9368 

00 

00 

00 

0 0 

00 

00 

00 

00 

: 00 

9370 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

9378 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

SUM: 

5B 

1A 

CA 

D0 

27 

67 

D0 

CF 

4806 

9380 

0 A 

91 

42 

92 

91 

48 

92 

2B 

: 05 

9388 

48 

77 

48 

A7 

77 

C9 

A7 

CC 

: 61 

9390 

C9 

9E 

CC 

7E 

9E 

00 

00 

00 

: 4 F 

9398 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

93A0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

93A8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

93B0 

00 

00 

00 

0 0 

00 

00 

00 

00 

: 00 

93B8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

93C0 

09 

58 

38 

5F 

56 

4E 

5F 

59 

: 54 

93C8 

2C 

78 

59 

98 

78 

BA 

98 

BC 

: IB 

93D0 

BA 

9E 

BC 

00 

00 

00 

00 

00 

: 14 

93D8 

00 

0 0 

or 

00 

00 

00 

00 

00 

: 00 

93E0 

00 

00 

00 

00 

00 

00 

00 

0 0 

: 00 

93E8 

00 

00 

00 

00 

0 0 

00 

00 

00 

: 00 

93F0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

93F8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

SUM: 

0A 

14 

A3 

AE 

74 

19 

30 

0C 

6FA3 

9400 

0C 

52 

41 

45 

52 

4E 

45 

3D 

: 06 

9408 

4E 

64 

16 

1C 

64 

85 

38 

B5 

: BA 

9410 

85 

D7 

B5 

DA 

D7 

AD 

DA 

8D 

: D6 

9418 

AD 

00 

00 

00 

00 

00 

00 

00 

: AD 

9420 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

9428 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

9430 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

9438 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

9440 

12 

81 

42 

92 

81 

3D 

92 

2D 

: E4 

9448 

3D 

1C 

2D 

IB 

1C 

47 

IB 

76 

: 95 

9450 

47 

B6 

76 

D8 

B6 

DB 

D8 

AE 

: 62 

9458 

DB 

7E 

AE 

6D 

7E 

6C 

6D 

7B 

: 46 

9460 

6C 

8B 

7B 

9C 

8B 

00 

00 

00 

: 99 

9468 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

9470 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

9478 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

SUM: 

69 

E9 

1A 

C9 

E9 

4B 

49 

4B 

81 IB 

9480 

16 

81 

42 

46 

81 

38 

46 

65 

: 83 

9488 

46 

A5 

65 

B6 

A5 

B8 

B6 

A9 

: C2 

9490 

B8 

7A 

A9 

6A 

7A 

59 

6A 

68 

: EA 

9498 

59 

78 

68 

89 

78 

2D 

89 

11) 

: 0D 

94A0 

2D 

4B 

ID 

5B 

4B 

7E 

5B 

AB 

: BF. 

94A8 

7E 

BB 

AB 

DD 

BB 

00 

00 

00 

: 7C 

94B0 

00 

00 

00 

00 

00 

00 

0 0 

0 0 

: 00 

94B8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

94C0 

0F 

83 

23 

A2 

83 

71 

60 

63 

: 0E 

94C8 

71 

37 

63 

19 

37 

76 

37 

87 

: 8F 

94D0 

76 

8B 

87 

D7 

D6 

88 

D7 

4C 

: E0 

94D8 

88 

4D 

4C 

5E 

4D 

BE 

5E 

00 

: E8 

94E0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

94E8 

00 

00 

0 0 

00 

0 0 

00 

0 0 

00 

: 00 

94F0 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

94F8 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

SUM: 

96 

B0 

D9 

17 

FB 

21 

16 

74 

60D2 

9500 

09 

71 

61 

ID 

71 

78 

39 

89 

: A3 

9508 

78 

8C 

89 

9D 

8C 

BD 

9D 

DB 

: EB 

9510 

BD 

D9 

DB 

00 

00 

00 

00 

00 

: 71 

9518 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

9520 

00 

00 

00 

0 0 

00 

00 

00 

00 

: 00 

9528 

00 

0 0 

00 

00 

00 

00 

00 

0 0 

: 00 

9530 

00 

0 0 

00 

00 

00 

00 

00 

00 

: 00 

9538 

00 

00 

00 

0 0 

00 

00 

00 

00 

: 00 

9540 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

9548 

00 

00 

00 

00 

00 

00 

0 0 

00 

: 00 

9550 

00 

00 

00 

0 0 

00 

00 

00 

00 

: 00 

9558 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

9560 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

9568 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

9570 

00 

00 

00 

00 

0 0 

00 

00 

0 0 

: 00 

9578 

00 

00 

00 

0 0 

00 

00 

00 

00 

: 00 

SUM: 

3E 

D6 

C5 

BA 

FD 

35 

D6 

64 

9 1 AB 


124 Oh! MZ 1987.8. 
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#W 

Bffi<7)40?:, 80^^— 

# ! 

7— F 3 7> F4 


S 8 7* 0 I7< 707177 K—M 

T : 128/\'-f Fs5' s - 
G ; 128/''7 F«4-^ 

R : (StAIt® • S* 

BREAK : T KU7A*CS4 

iil) 7 KI/7X1 i^i:^H 7t%C S-OS 
CS4 

>i2) 3099nOTC9ii£00ii(;-t4t, S7A 2; OR 

CfrS/jt-f 5 «fc n iz 4-S 
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THE SENTINEL 


819 s-os 


(7 K^*) 


t-S?* 

?5£* 

#COLD 

(IFFDh) 

S-OStf>P-JLK*?-K 

-?x'J7USRIZte$£*rU'3>7 Fl'MZW>7'T% „ U 
SR(3(i*7MI£LT#H0T<7)7 KU**xte£fl£ftTl'5 0 


# HOT 
(IFFAh) 

S-OStf)^x? (Z4o X #5 U, Zf □ >7> # #HiT =i v> K A* 

— 

# VER 
(IFF7h) 

HLVv*?(ZS-OS<7)4&fi£/va> 

«?&££LTfcU f _bffc4tz*'y FTMc^iJ^L, "F<£4 
t'«y F T^iJrt<7«i#-§-^^rr 0 

0 0 MZ-80K/C/I200 

0 1 MZ-700 

0 2 MZ-1500 

1 0 MZ-80B 

1 1 MZ-2000/2200 

1 2 MZ-2500 

2 0 XI/C/D/F/G/turbo 

3 0 PC-8801/mk II/SR/TR/FR/MR/FH/MH 

4 0 FM-7/77 

5 0 SMC-777 

6 0 PASOPIA 

LL'V*?^S-OS<7V \-v a > No. L T fc ‘J, £«/ \**y>r 
—v ^ii^q LfcU L S-OS <7)/ v a x *y * T 

HL 

#PRNT 

(IFF4h) 

H*)o 

F 

tfPRNTS 

(IFFIh) 

*<-* £ u t $ 0 

F 

#LETNL 
(|FEEh) 

SMtTS. 

4L 

# NL 
(1 FEBu) 


4L 

#MSG 
(1 FE8h) 

DEL-**?(7)^:1 -7 KUX/j'ibOD h#£> 

F 

#M$X | 

(1 FE5h) 

, DEU-v^^(7)^fT KU*#'»b00i!*) < &£3:T7**—P—F 
tWi 

F 

SMPRNT 
(1 FE2h) 

Z*l£P-;LL/-c#(7)7 KU**)'b OOn t)%Z>iT‘77>*—zl 

-P£*%i339mzr*. 

0IJ) CALL # MPRNT 

DM '‘MESSAGE" 

DB 0 

AF 

DE 

#TAB 

(IFDFh) 

B U '7* ? <7>fiS tij—vjux Mffi t cnmtzttx'i—x £g£Kf 

&o 

AF 

# LPRNT 
(IFDCh) 

A Lv*?<7)rt#£7**-=1- K£.&4L7'’'J >5<F)MZti\ 
IjTZ o *x l J7 ; y?'£-tZ'y 

bix i j?->rz a 

AF 

| #LPTON 

(IFD9h) 

JLI5# PRINT- #TAB, #PRTHX, # PRTHLc7)Hj* fcx'T * ~f 

>?cfc ^*'^*7 ^7 7 lpt 

SW£t«y FT$o zn£P-7LLfc:&£(i._tie+F7%-?-> 
T7^>>?(z *>&*;? ft6 0 

4‘1 

# LPTOF 
(IFD6h) 

77^#LPTSWt'J-b7 FTSo Zft£u-;LL/::fc£l;t, # 
PRINT- # TAB, # PRTHX, #PRTHL <77fcttfj£xT 
<77<frlZT$o 

4L 

#getl 

(IFD3h) 

DEL'S;*? IZdr-AJjs **y7X<7>Mi7 K U *£AtlTP —7L 
*-tf-F7r«b I^A*£LT£^iJ£A.y7x(zte 
IrtL'j?—x>K3—KtiOOiio i£4»T* SHIFT+ BRE 
AK*«ff3ftfc<b, /<-y7x$«::iBii*^3ft*. 

AF 9 

#getky 

(IFDOh) 

*-tf-F7x<b'J79L?<A*-AT)£-f£ 0 ATlLfcx-? 
(*a uv*?izt&$£ft, fa W£ftTi'4^£ #i*a lv* 
?CIO£-tz*y 

AF 

$ BRKEY 
(IFCDh) 

yuY^+-Mf?nxL^/)'i:'^'^i'y^r5o tf^n 
Tl'^^^(JH2P77?'$r-fe'y F LTU?->r& 0 

AF I 

# INKEY 
(IFCAvi) 

_ 

rafr*-fcm-3:T*-A*m>*U X-XlJtf&Zl: U? 
->T2>o &$tltz*— 077**-P — K(iAUS;*?tCHz‘y 
F£n$ 0 

AF | 


£PAUSE 
(IFC7h) 

L4l'o - <T)t # SHIFT^+ BREAK Z(7))^-7>^zi 
—Jl'Liz'-%(T>7 KL'*<7)2/<< h<7)rt^^#^L, 

>7'T?>o 

ff!l) CALL # PAUSE 

DW BRKJOB 

Z Z T yu -f ? *-£?Pf ^ BRKJOB^v; -7 >7 r 
$ fe4'< tdTDW BRKJOBIi^^'y^o 

AF 

#BELL 
(1 FC4h) 

(t°-7^) S-RSibTo 

AF 

#PRTHX 
(IFCIh) 

A U V*?16il£fc 2 

AF 

#PRTHL 

(IFBEh) 

HL U v* ? <7)P*3§ «r 16it& 4 ?> 0 

AF 

#ASC 

AUv*?C7)Tfi4 tf'y b(Di^\6m&k&tTZlr-Zi-F 

AF 

(IFBBn) 

tZ^IL, AUv*?(Z-t2>y hf^o 


# HEX 

A Uv*?(7)F^^I6jl^^-r7*+-P- Kt 

AF 

(t FB8u) 

AUv*?{Z-tZ‘y hT^o ALvX^(7)^'l6 
KT4'L'^(i, +t'J77?>-lz*y 

h LT U ?—>f •£><, 


£ 2HEX 

DEUv*?(7>^-r7 FLX*'b2A'Y h(7)F*9^^, 2^7<7)l6il 

AF 

(IFB5h) 

»£W7**-P- K^: L'C/Y'T^UH^U A Uv*? 

DE + 2 


(Z-tz-y Lf^c 


£HLHEX 

DEUv*?(7)T^-r7 KU*?!)''b4/\'< h<7)F*9^^r, 4#j<7)l6ii 

AF & 

(1 FB2ii) 

»^T7*+-P-Ki:LTM^^ij(z^L f HLUv*? 

HL I 


IZ-fe'y hT^>o +tU77^yh 

DE + 4 


JtL^o 


itWOPEN 

#FILET"t 7 hcf tl1z~7 t -f 7U^ t (# DTADR), (#SIZE), (# 

AF 

(IFAFh) 

EXADR) $rx-7(Z^SiZ^Z XT ffU'77» 

BC 


•f JL^'^-9 tS'(T) z f‘ x 7? ^TOo 17—^B#(Z(it'J77 

DE 



HL 

4?WRD 

(#DTADR), (# SIZE), (# EXADR) IZ^oT, xV\*< *lZx-? 

// 

(IFACh) 

^iz-7 r T^o xT*?<7)^£W0PENirr^'£ File not 
Open<7)X7—^Hi^o 


#FCB 

x-7(7)%^^<7)#RDI tz-otz<m\: 0 

// 

(1 FA9h) 

DIRN0C7>fii(Z^'7T(#IBFAD) IZxT U? V 'UKfo&ttn&t 

Z> 0 zm:«t U^^x-yn— Y^-7'^zt^iz < 

X. S Z £ K < x -r * ? U - K ^*7 Z ^ A<T$ &0CALL& ( # 
DIRNO) 

( # DIRNO) ? »j 7T% 0 'J ?4l2> t +1 »') 7 



x^TETTU?->-r?)o 


4?RDD 

(# DTADR), (# SIZE), (# EXADR) (Z^oT, x/n'T'*±<7)7 

// 

(1 FA6 h) 

#R0PEN^T'4'l'tFile not OpenCOx^ 

-*m 0 


#FILE 

ALy*^(Z77Y )\s(D7 h U tfa—h, DEl^v*?(Z7x'T 

// 

(IFA3h) 

7LSc7)AxTi'‘5^ii7 KU*^-fe'y hLTP-^-r^a: (# 

1 BFAD) (Z 7 X -f ;L^(7)-tz *y F ^ # DSK)tZ 7 x -T ^LxT * ? U 
y?<7)-tz'y h« t-5„ 7x'f;L^mrr?>Hiic(i, ^-rzw 
70L—^XZjlU, 7xi'^i:7 h U t'x-h^-tZ'y hL^ 
(tn^4'«b4'L'o P->'H : ^DElxv*?(i^^U(OOH)*' : 


#FSAME 

#FILET-tz-y h$tlf:7x<^-A£, t%fr&Mz7 x<;L 

// 

(IFAOh) 

-arnica. 

U?->r^)o 7M)bx~H77^x«y?t>|i|^ffi7o 


# FRRNT 

x-y*'«bSc^A^7x-fJL^-A^^:T?>o *^-* + 

// 

(IF9D„) 

-mr t „ 


#POKE 

HLUv*?c7)rt§:^^7-fe'y h7 KU*^ LT,CI0Sffi^7 

4' L I 

(IF9Ah) 

— ? x 'J 7IZ A U '7 * ? (7)^^:##IM;, 


# POKE W 

>j *'«b s-os x u tizx —? 

AF 

(l F97 ii) 

?>o HLUv*?(Z* : E'J5feSi7 KU*, DE Uv*?lZ7-? 

BC 


x'J 77-iz*y b7 FU*. BCUv*?^/^ h^AtlTP 

DE 


— JLfSo 

HL 

#PEEK 

HLU'7*?<7)F*g^?I-7-tZ‘y FT KU*t LT, S-OS 

AF 

(1 F94h) 

9—?x 'J Tfrh k Uv*?IZx—? ^rlx^-tliTo if POKE £ 
i&DSMto 


?PEEK<f' 

S-0Sffl4^9 -? x'J 76'b*Y>yTU(lx-?£$ta£T 

AF | 

{1 F9 1 h) 

^) 0 HL, DE, BC Uv*?lC-b-y FT^/n'x*-?^ #POKE 

DE j 


@^|5j L 0 

BC 

HL 

1 
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if MON 
(I F8 Eh) 




[HL] 

(IF8I11) 


HLUv^dP-JUL/cl'T b*U*£Aft, 
CALL [HL] 


4'L 


if GETPC 
(IF80 m) 


$&<7)7PXx A/ 3 1? > ?COfiS^-HLIIP L-T5 0 


HL 


ffDRDSB 

(2000m) 


DErtWUP- KA>/s'-/>'>b A^f^P— bWcttHL 
T KiiM-tz? ? U - Ko (if DSK) i:f/s' 
+ *(A~D)£-tZ'y b LTP-7UT£o 
LD DE, (if FATPOS) 

LD HL, (ffFATBF) 

LD A, I 
CALL # SCTRD 

£Tni£ FAT/<777tZFATftf Z17rT£ £ 0 


AF 

AF 


if DWTSB 
(2003 m) 


HLW7 KU'^A'‘bAUP-K^(Ax256/\'< b)<7)|^£, 
DE«aiu3-Ki:LTia»frfto aatfe^^7-r h„ (#d 

SK)(Zx'/s'+ 7(A-D)£-IZ'y bLTP-7U 0 


AF 

AF 


if DIR 
(2006m) 


(if DSK) Tli££ft/cx/s'+ TsUT&r* U? b 'J 


AF 

BC 

DE 

HL 


if ROPEN 
(2009 m) 


x-y<7)*S£(i, &(zifFlLETizx h$nfc77T^i: t If 
*&A/::IB£Jt&U l^-77 + 7U£«bizP, iI/K*/>-tzP 
x-f if FILET'-tZ'y b£tl/::7 

7-f JU^X-f 77_Bz£&/>'£*1 /T<7)+x 7 -tzP 7 

xXfcW&C'j-fe'yb£4'*o i'?ft<7)i§£-izt>, 17 -^m 
L/c £ £ (Zl J+ x 'J XU?—>T& 0 2 /c7 7 + 

(iiDTADR), (ifSIZE), (if EXADR) '<&£$ ft£ 0 


if SET 
(200 Cm) 


ff IBFADT^£ ft£IB/s'>y7 TCDfa'g £-&?%? 
77T^7T h^Px? b*t£ 0 


r *f 7?_h<7) 


if RESET 
(200 Fm) 


f: IBFADTtf£ tlS IB/s '7 7 -fSrf $ 7 7 -OK75 7 

Tb7Pr^ b^-ffo 


If NAME 
(20I2 h) 


$ FILETKfcS ft/c7 7 + £, DEUv^rtW^UJi 
<7>x-?lZgI;t* 0 *-A 0 ^UJc^x-^+UZ+W* 

tV7^ij7^^AoTI'T()MT5o ifcDE+16 Wrtd 
x> Kp-K(00h, ‘iWtel'tZlZteXy-ljtmLtZo 


ff KILL 
(2015 m) 


$\BFADTijk$M\B'<v7T<n[^£-$crZ>74Z9±.<n 
7 7'OU£*A/f$o 


ffCSR 

(2018m) 


HIZY/im L(ZXM0)0lTei»tt 
To m 73-7 JUfflBnMftttLfcfcfcl*Z<7)A&(Z<fc £ Z £ 0 
(#XYADR)(4tt*>fcl\, 


HL 


ifSCRN 
(201 Bm) 


HICY/im LlZX&**-fe7 bLP-JUf^^:, iS®Ji(7)|^ 
tefflz&S + v x £ A izBtfrtBTo 


AF 


ffLOC 
(201 Em) 


HCYHi, LlZXMlSrAftTP-JLT^, 73-7MuS 
tf+ZlZtx b*ft'*« T3-7>K4§i(7)I^M'-rC(7) 

A&tz«fcaz£ 0 


AF 


ff FLGET 
(2021 h) 


a-yjufflrc. *-v;u^ti^A*^m\ Atzflpsn 

^t7^^^7b„ *- b U fcf- b (MZ-80K/C/ 

I200(i^oj) a 


AF 


ff RDVSW 
(2024 h) 


5*7 *JU b 5*/<-f 7 £ A tZlf&tHTo 77 *7L b U /cl' £ 

2 Cli'jZ'fC^CJ: % b<DH TZ a 


ifSDVSW 

(2027m) 


x7*)Lb(ZL/cl'57s'+7:g£A{ZAftP-Jl/t&£, x7 
*)L bx/<TX^7b$n?>o Z5Z £ c 

(if DVSW) z£ bm±?Z>o 


AF 


ffINP 

(202Am) 


&all/0tf-b*'<b I /s'-r b£A(Zfflt*&t; 0 — b(2 C Tit 
;Tf5o 


AF 


ff OUT 
(202 Dm) 


*»/Otf-h^A*ffl*T*. *-b(2CTlt£f io 


Kl 


ffWIDCH 

(2030m) 


SStfFE-K (40+ 7 , 80+*x) ^rbjjum^o AIZ4Q& 
T<7)*fcfc-fe7 b-f$£40+V7. 402: t) *gi'&£-tZ7 b LT 
p-juT 6 £80* V7i^o 5I£<7 )^e- b'(2( if WIDTH) UA 
oTL'-5 d ZMZ-80K/C/1200/700 1500l-li&'l'o 


AF 

BC 

DE 

HL 


ff ERROR 
(2033m) 


A(Zx7-#-§-5r-tZ'y b LTP-JUf^Z £(::£ U17-7 >y 
iz—^ ^:^7 fT-5 0 


^10 S-OSO^-^xijy 


ty — 

(7 Ku-x, /<< MS) 

rt § 

ffUSR 

(IF7Eh~.2/s*< b) 

CIOS?rP-;U K7^-b Uzht v b'U7^L 

Tl'&o il^(iS-dS(7)/Tx'y b^^-b<7)T KU^d4'oTl' 

Zo 

ffDVSW 

(IF7Dh , |/s'< b) 

x-7°7^-V‘y bKt‘*m$i7LZ>77y o 

0 i MZ7*-V«y b2400/T'-(^iiX- K) 

1 -.rntm^-ttzim 

3 :QD(MZ-1500(7)*) 
p—;ub':*?-b^(*0C&xTi'$ o 

ffLPSW 

(IF7Ci», l/W b) 

if PRINT— ff TAB, IfPRTHL, ff PRTHXJU-^>T(7)tB*^x 

Y ^ yU"f/c(tT4'< yJ > ^ (L tB*T ^ x 7; 

0 > ? (Z b tB*o P ^-;u K 7 5 — b m* 0 tz/j:xT 

l'?>0 

if PRCNT 

(IF7Ah~,2/sW b) 

^LT*'b^L/z^&^^LT^?>X KUA^LT 
I'-So 

ffXYADR 

(IF78h~,2/sV b) 

nxy.'ZT ku^^lti'^ 0 

ffKBFAD 

(IF76h-'. 2/<< b) 

^t^fi(7)+-ATlffl/s'>y7 7<7)7 KU7 ^tfLTI'?> 0 

0IJ) LD DE, (ffKBFAD) 

CALL ff GETL 

ifIBFAD 

j (IF74 h~, 2/s'< b) 

•T>7^>-'>3>yp*y^<7)^i7 KUX^LTl^o IsJ 
^(Z7 7'OUT b U t'a- b<7)7 

if SIZE 

(IF72h~,2/s'< b) 

77TWX ifWOPEN, ffWRD, ftFCB, ffRDD, ffR 
0PEN;U-5">T#ffl?n?)o 

ff DTADR 

(IF70ii~,2/\'-f b) 

77'1'Jl^feii7 KU7 0 

ff EXADR 

(1 F6Eh —, 2/s'-f b) 

7 7-OU7)X> b U7KUX 0 

ifSTKAD 

(IF6Gh~, 2/s’-f b ) 

^l(7)^z7*T^fflLTl'^7^*yfZ(7)7KU7^LTl' 

If MEMAX 

(lF6 Ah~, 2/s'-f b) 

§. 

S-OST1$fflT# % ^ X «J <7)_hJ!R£?!-t a 

ilWKSIZ 

(iFeSii-.Z/s'-f b) 

»-2xU 7^-f X4*r. 

ffDIRNO 

(IF67m, l/s'-f b) 

ffFCBT^T^> , 7-i7 0 Z(7)7-?f££AftTitFCB£P- 
^*'b^T^(7MilT^^n?>FCB^ (ifIBFAD) 
(ZP-KT^o P-K&. fifitJIfUXSc 

if MXTRK 
(IF66 m, l/s'-T b) 

imX‘$ Z>Wck b x "j ^^AxTl'^o 

if DTBUF 

(IF64ii~.2/s''f b) 

x-f 7i>/)'ibx— 7 FL/XAAoTL^o x 
-^/s'*y7 7(i256/s'< bo 

ff FATBF 

(IF62h~,2/s*< b) 

xV 7?/)'»bFAT KU7/)<AxTl'^> 0 FAT 

/s'x 7 7«256/W b 0 

ffDIRPS 

(IF60m~, 2/s # < b) 

XY Ui> b UA'AxTl'^UP- KA>/s'-< 7)&£ ‘J 
S-OS“SWORD’’T(ilOM,*#^^Zi:iC«j;oTx'rU^ b U 
<7>f4a^^jT# ^) 0 

ff FATPOS 
(IF5 Em~, 2/« b) 

7 7-f P/r—'> a >x—7*JU(FAT) A'AoTl'^UP- K 

cb>/s'-^-To S-0S' , SW0RD"T(i0En o ##^?)Zi:Cct 1 

U FAT(7M4S^^jT S Z t *)<T# 

if DSK 

(1 F5Dm, 1 / s' -f b) 

T -tz 7 L J: 1 1T S x/ s*< 

ff WIDTH 

(IFSCm, l/W b) 

K^AoTl'-So 

40+7 7(7)11^ : 28m 

80+V 7(7)1^ : 50m 

MZ-80K/C/1200/700/1500(21&40+ r 7®t a 

I 

ffMAXLN 
(1 F5 Bm, l/s'-f b) 
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3800 

20 

27 

53 

4F 

53 

53 

59 

53 

3B 

3808 

56 

31 

00 

08 

80 

08 

83 

08 

A2 

3810 

86 

08 

89 

OH 

8C 

08 

8F 

00 

42 

3818 

IB 

03 

IB 

06 

IB 

09 

IB 

0C 

8A 

3820 

IB 

0F 

IB 

12 

IB 

15 

IB 

18 

BA 

3828 

IB 

1A 

50 

4F 

IF 

8B 

10 

CE 

5C 

3830 

06 

00 

30 

8C 

D6 

CE 

FF 

F2 

57 

3838 

C6 

0C 

8D 

7D 

31 

8C 

D8 

CE 

3F 

3840 

00 

00 

CC 

C3 

0 8 

A7 

C4 

AE 

B0 

3848 

Al 

AF 

41 

33 

•18 

5A 

26 

F5 

81 

3850 

3 3 

C8 

36 

A7 

C4 

AE 

A4 

AF 

9D 

3858 

41 

86 

40 

9 7 

8B 

B7 

FD 

00 

DD 

3860 

4F 

97 

8C 

B7 

FD 

02 

97 

8E 

4D 

3868 

4C 

97 

8D 

B7 

FD 

03 

86 

14 

Cl 

3870 

97 

8A 

86 

FF 

97 

86 

1C 

AF 

8E 

3878 

16 

07 

B8 

00 

00 

00 

00 

00 

D5 

SUM: 

76 

54 

F9 

70 

EB 

57 

4C 

B0 : 

: 71 

3880 

7E 

08 

92 

7E 

08 

92 

7E 

08 

B6 

3888 

93 

7E 

08 

92 

7E 

08 

92 

7E 

41 

3890 

08 

92 

3B 

34 

02 

B6 

FD 

04 

C2 

3898 

84 

02 

26 

1A 

43 

97 

87 

96 

BD 

38A0 

8E 

2B 

0C 

8A 

40 

B7 

FD 

05 

48 

38A8 

84 

BF 

B7 

FD 

05 

97 

8E 

B6 

D7 

38B0 

FD 

04 

85 

02 

27 

F9 

35 

02 

DF 

38B8 

3B 

A6 

80 

A7 

C0 

5A 

26 

F9 

41 

38C0 

39 

A6 

80 

A7 

C0 

31 

3F 

26 

5C 

38C8 

F8 

39 

34 

02 

B6 

FD 

05 

2B 

4A 

38D0 

FB 

96 

8E 

8 A 

80 

97 

8E 

B7 

05 

38D8 

FD 

05 

B6 

FD 

05 

2A 

FB 

35 

14 

38E0 

82 

34 

02 

B6 

FC 

80 

8A 

80 

F4 

38E8 

B7 

FC 

80 

8C 

34 

02 

96 

8E 

19 

38F0 

84 

7F 

B7 

FD 

0 5 

97 

8E 

35 

16 

38F8 

82 

39 

CE 

FC 

82 

86 

0A 

8D 

24 

SUM: 

4F 

10 

C2 

F9 

A9 

16 

FF 

E3 : 

: BB 

3900 

C9 

A7 

C4 

8D 

E7 

8D 

C3 

EC 

E4 

3908 

41 

DD 

84 

20 

D4 

34 

46 

CE 

DE 

3910 

FC 

81 

CC 

03 

03 

8D 

B3 

6F 

FE 

3918 

C0 

ED 

Cl 

86 

12 

A7 

C0 

DC 

49 

3920 

84 

ED 

C4 

35 

46 

20 

C5 

34 

C9 

3928 

06 

D6 

89 

CA 

01 

20 

06 

34 

8A 

3930 

06 

D6 

89 

C4 

3E 

D7 

89 

86 

4D 

3938 

0C 

8D 

8F 

FD 

FC 

82 

8D 

AC 

DC 

3940 

35 

86 

34 

46 

CE 

FC 

81 

CC 

4C 

3948 

03 

02 

17 

FF 

7D 

6F 

CO 

ED 

B4 

3950 

Cl 

CC 

IB 

39 

BD 

C4 

35 

46 

0D 

3958 

20 

92 

EC 

A8 

10 

IE 

89 

IF 

1C 

3960 

01 

CE 

FC 

82 

CC 

01 

08 

17 

39 

3968 

FF 

60 

A7 

C0 

17 

FF 

4A 

17 

3D 

3970 

FF 

7A 

20 

86 

CE 

FC 

82 

86 

FI 

3978 

0C 

E6 

2B 

C4 

3F 

D7 

89 

17 

97 

SUM: 

86 

8C 

7A 

A8 

89 

AE 

B9 

88 : 

: AC 

3980 

PP 

48 

ED 

C4 

16 

FF 

65 

EC 

5E 

3988 

A8 

10 

IE 

89 

IF 

01 

CC 

0B 

56 

3990 

0A 

CE 

FC 

82 

17 

FF 

33 

A7 

46 

3998 

ce 

17 

FF 

ID 

16 

FF 

4D 

A6 

FB 

39A0 

2B 

84 

IF 

97 

88 

39 

B6 

FD 

D9 

39A8 

05 

2B 

FB 

A6 

2B 

84 

77 

97 

8E 

39B0 

8F 

43 

B7 

FD 

37 

39 

8E 

FD 

81 

39B8 

38 

A6 

2B 

B6 

2B 

84 

07 

54 

F9 

39C0 

54 

54 

54 

C4 

07 

A7 

85 

39 

2C 

39C8 

17 

FF 

64 

17 

PP 

3F 

17 

FF 

E5 

39D0 

56 

8D 

0D 

4D 

27 

FB 

39 

17 

AF 

39D8 

PP 

55 

17 

FF 

30 

17 

FF 

47 

F7 

39E0 

96 

87 

27 

09 

0F 

87 

86 

IB 

84 

39E8 

A7 

2B 

16 

FF 

55 

CE 

FC 

82 

88 

39F0 

CC 

29 

00 

17 

FE 

D4 

ED 

C4 

8F 

39F8 

17 

FE 

FI 

17 

FE 

CC 

EC 

41 

14 

SUM: 

48 

E3 

0C 

69 

34 

65 

A2 

61 : 

: 3C 

3A00 

17 

FE 

DE 

5D 

27 

0D 

81 

87 

8C 

3A08 

26 

02 

86 

7 U 

81 

FI 

26 

04 

C5 

3A10 

86 

7F 

21 

4F 

A7 

2B 

39 

A6 

26 

3A18 

2A 

D6 

87 

27 

06 

17 

FF 

22 

EC 

3A20 

8A 

40 

8C 

84 

BF 

A7 

2A 

0F 

79 

3A28 

87 

39 

A6 

2B 

34 

02 

17 

FE 

DC 

3A30 

FE 

17 

FE 

D9 

17 

FE 

F0 

0C 

FD 

3A38 

83 

CE 

FC 

81 

CC 

03 

01 

17 

B5 

3A40 

FE 

88 

6F 

C0 

ED 

Cl 

35 

02 

9A 

3A48 

81 

7 B 

26 

02 

86 

87 

81 

7F 

31 

3A50 

26 

02 

86 

FI 

A7 

C4 

81 

0D 

98 

3A58 

26 

OD 

0F 

83 

86 

11 

D6 

88 

BA 

3A60 

ED 

41 

86 

03 

B7 

FC 

83 

17 

04 

3A68 

FE 

82 

16 

FE 

8D 

00 

00 

3F 

60 

3A70 

59 

41 

4D 

4 1 

55 

43 

48 

49 

51 

3A7 8 

93 

D3 

8F 

90 

9B 

54 

A6 

84 

Al 

SUM: 

21 

9C 

DA 

5F 

02 

9A 

8F 

BC : 

; DD 

3A80 

84 

BF 

A7 

80 

9C 

56 

25 

F6 : 

: 77 

3A88 

9E 

5C 

A 6 

84 

8A 

40 

A7 

84 : 

: 19 

3A90 

30 

01 

A6 

84 

2B 

04 

9C 

56 : 

: 7C 

3A98 

23 

F6 

30 

IF 

A6 

89 

F8 

30 : 

BF 

3AA0 

26 

04 

A6 

84 

2A 

F4 

IF 

12 : 

A3 

3AA8 

BD 

EA 

7F 

BD 

E3 

C3 

7E 

E7 : 

EE 

3AB0 

87 

17 

FE 

7B 

17 

FE 

56 

17 : 

99 

3AB8 

FE 

6D 

0F 

87 

EC 

2E 

IE 

89 : 

C2 

3AC0 

IF 

01 

CC 

00 

00 

A7 

80 

5A : 

6D 

3AC8 

26 

FB 

CE 

FC 

81 

CC 

04 

00 : 

3C 

3AD0 

17 

FD 

F7 

6F 

C0 

ED 

C4 

17 : 

02 

3AD8 

FE 

12 

30 

8C 

90 

CE 

FC 

80 : 

A6 


3AE0 

17 

FD 

E7 

A6 

43 

E6 

41 

2A : 

35 

3AE8 

0E 

6F 

41 

C6 

64 

E7 

42 

17 : 

28 

3AF0 

FD 

FA 

17 

FD 

D5 

20 

EE 

4D : 

3B 

3AF8 

27 

0D 

17 

FD 

E4 

4 A 

26 

CA : 

66 

SUM: 

80 

02 

6C 

47 

38 

6B 

4C 

E2 : 

06 

3B00 

86 

FF 

97 

87 

17 

FD 

C3 

C6 

40 

3B08 

44 

17 

FD 

AD 

17 

FD 

DD 

CE 

C4 

3B10 

FC 

82 

86 

05 

17 

FD 

B3 

A7 

77 

3B18 

Cl 

17 

FD 

D0 

EC 

2E 

IE 

89 

66 

3B20 

IF 

01 

D6 

86 

34 

04 

17 

FD 

C8 

3B28 

Al 

E6 

C0 

C0 

03 

23 

35 

33 

95 

3B30 

43 

A6 

C0 

26 

02 

86 

20 

81 

F8 

3B38 

87 

26 

02 

86 

7B 

81 

FI 

26 

48 

3B40 

02 

86 

7F 

A7 

80 

6A 

E4 

27 

A3 

3B48 

IB 

5A 

26 

E5 

B6 

FC 

81 

2A 

DD 

3B50 

13 

CE 

FC 

81 

86 

64 

6F 

C0 

77 

3B58 

A7 

Cl 

17 

FD 

8F 

17 

FD 

6A 

89 

3B60 

E6 

C0 

26 

CD 

17 

FD 

7A 

32 

59 

3B68 

61 

17 

FD 

8E 

6F 

84 

86 

0D 

89 

3B70 

17 

FE 

B9 

EC 

2E 

IE 

89 

IF 

AE 

3B78 

01 

96 

87 

27 

07 

CC 

IB 

00 

33 

SUM: 

47 

3C 

8A 

73 

EB 

9F 

43 

74 : 

: Cl 

3B80 

ED 

84 

D7 

87 

39 

17 

FD 

A7 

C3 

3B88 

17 

FD 

8 2 

17 

FD 

99 

0F 

87 

D9 

3B90 

CE 

FC 

82 

86 

05 

17 

FD 

32 

ID 

3B98 

A7 

C0 

17 

FD 

4F 

17 

FD 

2A 

08 

3BA0 

96 

87 

26 

0A 

A6 

C0 

27 

15 

EF 

3BA8 

17 

FD 

36 

4 A 

2 6 

E2 

0F 

87 

32 

3BB0 

EC 

2E 

IE 

89 

IF 

01 

86 

IB 

82 

3BB8 

A7 

84 

16 

FD 

3D 

D6 

86 

34 

0B 

3BC0 

04 

EC 

2E 

IE 

89 

IF 

01 

E6 

CB 

3BC8 

C4 

33 

43 

C0 

03 

23 

3D 

A6 

03 

3BD0 

C0 

26 

02 

86 

20 

81 

87 

26 

BC 

3BD8 

02 

86 

7B 

81 

FI 

26 

02 

86 

23 

3BE0 

7F 

A7 

80 

6A 

E4 

27 

IB 

5A 

90 

3BE8 

26 

E5 

B6 

FC 

81 

2A 

13 

CE 

49 

3BF0 

FC 

81 

86 

64 

6F 

C0 

A7 

Cl 

FE 

3BF8 

17 

FC 

FI 

17 

FC 

CC 

E6 

C0 

89 

SUM: 

FB 

47 

ID 

Cl 

IF 

ID 

CA 

56 

: 7C 

3C00 

26 

CD 

17 

FC 

DC 

32 

61 

6F 

E4 

3C08 

84 

16 

FC 

EE 

CE 

FC 

82 

86 

56 

3C10 

03 

7F 

FC 

83 

20 

82 

17 

FD 

B7 

3C18 

16 

17 

FC 

FI 

17 

FD 

08 

EC 

22 

3C20 

2E 

IE 

89 

IF 

01 

A6 

2B 

34 

FA 

3C28 

02 

CE 

FC 

81 

CC 

03 

00 

17 

33 

3C30 

FC 

98 

6F 

C0 

A7 

Cl 

A6 

80 

51 

3C38 

Al 

E4 

26 

0B 

F7 

FC 

83 

17 

43 

3C40 

FC 

AA 

32 

61 

16 

PC 

B3 

0C 

0A 

3C48 

83 

81 

7B 

26 

02 

86 

87 

81 

35 

3C50 

7F 

26 

02 

86 

FI 

A7 

C0 

5C 

El 

3C58 

81 

0D 

27 

0C 

Cl 

7C 

25 

D6 

F9 

3C60 

F7 

FC 

83 

17 

FC 

86 

20 

Cl 

F0 

3C68 

0F 

83 

F7 

FC 

83 

17 

FC 

7C 

97 

3C70 

CE 

FC 

81 

CC 

03 

02 

17 

FC 

2F 

3C78 

51 

6F 

C0 

ED 

Cl 

86 

11 

D6 

9B 

SUM: 

34 

29 

B6 

AE 

59 

DD 

B9 

8E : 

: 3E 

3C80 

88 

ED 

C4 

17 

FC 

66 

20 

Al 

73 

3C88 

17 

FC 

6F 

DC 

84 

ED 

A 8 

10 

87 

3C90 

39 

EC 

A8 

10 

DD 

84 

17 

FC 

51 

3C98 

96 

17 

FC 

71 

17 

FC 

2B 

B6 

0E 

3CA0 

FC 

80 

27 

02 

86 

0 1 

A7 

2A 

FD 

3CA8 

86 

80 

B7 

FC 

80 

17 

FC 

3C 

88 

3CB0 

16 

FC 

74 

CE 

FC 

82 

86 

06 

5E 

3CB8 

17 

FC 

OF 

A7 

C0 

EC 

A8 

10 

2D 

3CC0 

ED 

Cl 

BD 

C4 

17 

FC 

25 

17 

AE 

3CC8 

FC 

00 

B6 

FC 

80 

26 

15 

A7 

10 

3CD0 

2A 

A6 

5F 

81 

87 

26 

02 

86 

E5 

3CD8 

7B 

81 

FI 

26 

02 

86 

7F 

A7 

Cl 

3CE0 

2B 

16 

FB 

FD 

86 

01 

A 7 

2A 

91 

3CE8 

16 

FB 

F6 

CE 

FC 

8 1 

86 

07 

DF 

3CF0 

17 

FB 

D7 

6F 

C0 

A? 

C0 

EC 

6B 

3CF8 

A8 

10 

ED 

Cl 

ED 

Cl 

96 

88 

32 

SUM: 

AB 

E8 

E0 

49 

85 

11 

19 

6F : 

: DA 

3D00 

C6 

01 

ED 

Cl 

A6 

2B 

81 

7B 

42 

3D08 

26 

02 

86 

87 

81 

7F 

26 

02 

5D 

3D10 

86 

FI 

A 7 

C4 

16 

FB 

D5 

A6 

6E 

3D18 

2B 

81 

0D 

26 

04 

8D 

02 

86 

F8 

3D20 

0A 

81 

7B 

26 

02 

86 

87 

81 

BC 

3D28 

7F 

26 

02 

86 

FI 

D6 

8A 

34 

B2 

3D30 

04 

8B 

3B 

2F 

F6 

FD 

02 

C5 

B6 

3D38 

08 

26 

0 F 

C5 

02 

27 

03 

54 

82 

3D40 

24 

11 

30 

IF 

26 

EE 

6A 

E4 

E6 

3D48 

26 

E7 

A6 

2A 

BA 

01 

A7 

2A 

39 

3D50 

43 

35 

82 

B7 

FD 

01 

96 

8B 

D0 

3D58 

84 

BF 

B7 

FD 

00 

8A 

40 

B7 

78 

3D60 

FD 

00 

97 

8B 

A6 

2A 

84 

FE 

71 

3D68 

A7 

2A 

4F 

35 

82 

EC 

2E 

IE 

0F 

3D7 0 

89 

IF 

03 

8 6 

2B 

34 

04 

A6 

9A 

3D78 

C0 

Al 

E4 

27 

04 

81) 

9A 

24 

BB 

SUM: 

30 

A6 

CA 

9C 

30 

03 

CB 

AD : 

: E7 

3D80 

F6 

35 

82 

EC 

A8 

10 

IE 

89 : 

: F8 

3D88 

34 

06 

E6 

2D 

Cl 

80 

23 

02 : 

B3 

3D90 

C6 

80 

8E 

FC 

80 

35 

40 

17 : 

: DC 

3D98 

FB 

30 

17 

FB 

1C 

16 

FB 

41 : 

AB 

3DA0 

EC 

A8 

10 

IE 

89 

IF 

01 

E6 : 

51 


3DA8 

2D 

Cl 

80 

23 

02 

C6 

80 

CE 

A7 

3DB0 

FC 

80 

17 

FB 

15 

17 

FB 

01 

B6 

3DB8 

16 

FB 

31 

00 

00 

3F 

59 

41 

IB 

3DC0 

4D 

41 

55 

43 

48 

49 

93 

D3 

ID 

3DC8 

8F 

90 

8E 

00 

00 

IF 

10 

84 

60 

3DD0 

C0 

34 

02 

DC 

IF 

84 

3F 

C4 

78 

3DD8 

E0 

43 

53 

C3 

00 

01 

30 

8B 

F5 

3DE0 

IF 

10 

84 

3F 

AA 

E0 

IF 

01 

9C 

3DE8 

B5 

D4 

09 

20 

07 

A6 

84 

B7 

9A 

3DF0 

D3 

83 

20 

04 

86 

00 

A7 

84 

2B 

3DF8 

B7 

D4 

09 

39 

B6 

FD 

05 

2B 

B0 

SUM: 

F0 

52 

D3 

CA 

F9 

86 

B2 

E6 : 

F6 

3E00 

FB 

96 

8F 

8A 

07 

43 

B7 

FD 

A8 

3E08 

37 

EC 

2E 

IE 

89 

ED 

8C 

BB 

2C 

3E10 

86 

21 

A7 

8C 

D6 

30 

8C 

A3 

0F 

3E18 

CB 

FC 

80 

C6 

41 

17 

FA 

AA 

0C 

3E20 

17 

FA 

96 

17 

FA 

C6 

17 

FA 

8F 

3E28 

Al 

B6 

FC 

83 

A7 

2B 

17 

FA 

B9 

3E30 

B0 

96 

8F 

43 

B7 

FD 

37 

39 

3C 

3E38 

B6 

FD 

05 

2B 

FB 

96 

8F 

8A 

8D 

3E40 

07 

43 

B7 

FD 

37 

EC 

2E 

IE 

6D 

3E48 

89 

ED 

8D 

FF 

7E 

86 

20 

A7 

CD 

3E50 

8C 

99 

A6 

2B 

A7 

8C 

9E 

30 

F7 

3E58 

8D 

FF 

60 

CE 

FC 

80 

C6 

41 

3D 

3E60 

17 

FA 

67 

17 

FA 

53 

17 

FA 

ED 

3E68 

83 

B6 

FD 

05 

2B 

FB 

96 

8F 

86 

3E70 

43 

B7 

FD 

37 

39 

00 

00 

3F 

A6 

3E78 

59 

41 

4D 

41 

55 

43 

48 

49 

51 

SUM: 

83 

52 

02 

8B 

05 

0A 

64 

03 : 

: D8 

3E80 

93 

D3 

8F 

90 

8E 

00 

00 

B5 

C8 

3E88 

D4 

09 

20 

07 

A6 

84 

B7 

D3 

B8 

3E90 

83 

20 

04 

86 

00 

A7 

84 

B7 

0F 

3E98 

D4 

09 

39 

EC 

2E 

IE 

89 

ED 

C4 

3EA0 

8C 

E3 

86 

21 

A7 

8C 

E3 

30 

5C 

3EA8 

8C 

CB 

CE 

FC 

8 0 

C6 

26 

17 

A4 

3EB0 

FA 

18 

17 

FA 

04 

17 

FA 

34 

6C 

3EB8 

17 

FA 

0F 

B6 

FC 

83 

A7 

2B 

27 

3EC0 

16 

FA 

IE 

EC 

2B 

IE 

89 

ED 

DC 

3EC8 

8C 

BB 

86 

20 

A7 

8C 

BB 

A6 

81 

3ED0 

2B 

A7 

8C 

C0 

30 

8C 

9E 

CE 

46 

3ED8 

FC 

80 

06 

26 

17 

F9 

EB 

17 

7A 

3EE0 

F9 

D7 

16 

FA 

0 7 

86 

0A 

8C 

03 

3EE8 

86 

09 

34 

09 

C6 

FD 

IF 

9B 

49 

3EF0 

32 

78 

30 

E4 

A7 

84 

EC 

A8 

7D 

3EF8 

10 

IE 

89 

IF 

03 

ED 

02 

A6 

6E 

SUM: 

71 

17 

5F 

CE 

1C 

58 

52 

BF : 

: 3A 

3F00 

2E 

84 

0F 

4C 

A7 

05 

A6 

2B 

8D 

3F08 

5F 

85 

10 

27 

01 

5C 

E7 

06 

65 

3F10 

EC 

2E 

IE 

89 

58 

49 

58 

49 

03 

3F18 

58 

49 

84 

3F 

A7 

04 

A6 

2C 

B1 

3F20 

84 

03 

A7 

07 

B6 

2B 

34 

74 

EE 

3F28 

8D 

4B 

35 

74 

A7 

01 

26 

23 

72 

3F30 

5 A 

27 

30 

33 

C9 

01 

00 

EF 

9D 

3F38 

02 

6C 

05 

A6 

05 

81 

10 

23 

D2 

3F40 

E5 

86 

01 

A7 

05 

6C 

06 

A6 

30 

3F48 

06 

81 

01 

23 

D9 

6F 

06 

6C 

65 

3F50 

04 

20 

D3 

80 

0A 

27 

06 

4A 

F8 

3F58 

27 

06 

86 

01 

8C 

86 

02 

8C 

54 

3F60 

86 

04 

21 

4F 

E6 

2A 

A7 

2B 

DC 

3F68 

26 

03 

C4 

FE 

8C 

CA 

01 

E7 

29 

3F70 

2A 

32 

68 

35 

89 

A6 

84 

81 

2D 

3F78 

0A 

26 

03 

7E 

FE 

08 

7E 

FB 

33 

SUM: 

34 

ED 

7D 

DA 

6F 

86 

B3 

CB 

: EB 

3F80 

05 

EC 

A8 

10 

IE 

89 

IF 

01 

70 

3F88 

6E 

84 

17 

F9 

3D 

30 

8D 

00 

FC 

3F90 

34 

CE 

FC 

80 

F6 

00 

12 

A6 

2C 

3F98 

80 

A7 

C0 

5A 

26 

F9 

17 

F9 

70 

3FA0 

4B 

30 

8D 

00 

23 

CE 

FC 

80 

75 

3FA8 

C6 

0F 

A6 

80 

A7 

C0 

5A 

26 

E2 

3FB0 

F9 

17 

F9 

38 

4F 

B7 

FD 

37 

7B 

3FB8 

8E 

FD 

38 

A7 

80 

4C 

81 

07 

BE 

3FC0 

26 

F9 

7E 

FE 

00 

00 

00 

01 

9C 

3FC8 

00 

00 

3F 

59 

41 

4D 

41 

55 

BC 

3FD0 

43 

48 

49 

93 

E0 

00 

90 

F9 

D0 

3FD8 

22 

F9 

83 

F9 

9D 

F9 

B0 

F9 

D6 

3FE0 

C8 

F9 

CF 

F9 

DF 

F9 

FI 

FA 

4C 

3FE8 

00 

FA 

40 

FA 

53 

FA 

DA 

FB 

56 

3FF0 

AE 

FC 

3F 

FC 

B1 

FC 

BA 

FC 

48 

3FF8 

DC 

FD 

14 

FD 

40 

FD 

96 

FD 

BA 

SUM: 

9C 

5E 

CA 

11 

FI 

75 

45 

BA : 

: 3A 

4000 

AC 

FD 

C9 

FE 

25 

FE 

61 

FE : 

: F2 

4008 

C4 

FE 

EC 

FF 

0E 

FF 

11 

F9 : 

; C4 

4010 

22 

FF 

AA 

FF 

B3 

33 

8C 

BF 

: FB 

4018 

DC 

80 

IE 

89 

IF 

02 

A6 

A4 

: 6E 

4020 

D6 

82 

58 

Cl 

3E 

23 

04 

5F 

: 35 

4028 

8A 

01 

8C 

84 

FE 

A7 

A4 

EC 

: D0 

4030 

C5 

AD 

CB 

86 

01 

B7 

FD 

05 

: 7D 

4038 

12 

20 

DA 

00 

00 

00 

00 

00 

: 0C 

4040 

00 

0 0 

00 

00 

0 0 

00 

00 

00 

: 00 

4048 

00 

00 

00 

0 0 

0 0 

00 

00 

00 

: 00 

4050 

0 0 

00 

00 

00 

00 

0 0 

00 

00 

: 00 

4058 

00 

00 

00 

0 0 

00 

00 

00 

00 

: 00 

4060 

0 0 

00 

00 

0 0 

00 

00 

00 

00 

: 00 

4068 

0 0 

00 

00 

00 

00 

00 

00 

00 

: 00 

4070 

00 

00 

00 

00 

0 0 

00 

00 

00 

: 00 

4078 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 
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SUM: 

A5 

CA 

06 

50 

42 

B3 

49 

AA 

: AD 

4080 

31 

00 

0 3 

3A 

5C 

IF 

FE 

50 

37 

4088 

3E 

50 

C4 

AA 

IB 

11 

A2 

10 

DA 

4090 

CD 

13 

1C 

C3 

A2 

16 

00 

04 

7B 

4098 

00 

00 

00 

00 

00 

00 

00 

00 

00 

40A0 

00 

00 

53 

57 

4F 

52 

44 

2D 

BC 

40A8 

46 

4D 

37 

20 

5A 

2D 

38 

30 

D9 

40B0 

20 

44 

65 

62 

75 

67 

67 

65 

D3 

40B8 

72 

0D 

00 

2D 

2D 

3E 

20 

42 

79 

40C0 

72 

65 

61 

6B 

20 

61 

74 

20 

B8 

40C8 

24 

00 

57 

68 

61 

74 

3F 

0D 

04 

40D0 

00 

42 

72 

65 

61 

6B 

20 

70 

75 

40D8 

6F 

69 

6E 

74 

20 

69 

73 

20 

D6 

40E0 

24 

00 

2A 

2A 

2A 

2A 

0D 

00 

D9 

40E8 

41 

64 

64 

72 

20 

3E 

20 

2B 

24 

40F0 

30 

20 

2B 

31 

20 

2B 

32 

20 

49 

40F8 

2B 

33 

2 0 

2B 

34 

20 

2B 

35 

5D 

SUM: 

D9 

C8 

43 

51 

04 

C6 

73 

A5 : 

: 17 

4100 

20 

2B 

36 

20 

2B 

37 

20 

2B 

4E 

4108 

38 

20 

2B 

39 

20 

2B 

41 

20 

68 

4110 

2B 

42 

20 

2B 

43 

20 

2B 

44 

8A 

4118 

20 

2B 

45 

20 

2B 

46 

20 

3A 

7B 

4120 

20 

53 

75 

6D 

20 

20 

30 

31 

F6 

4128 

32 

33 

34 

35 

36 

37 

38 

39 

AC 

4130 

41 

42 

43 

44 

45 

46 

0D 

00 

A2 

4138 

20 

3B 

20 

00 

3A 

20 

00 

20 

F8 

4140 

20 

20 

00 

23 

23 

23 

23 

23 

EF 

4148 

23 

23 

23 

23 

23 

23 

23 

23 

18 

4150 

23 

23 

23 

23 

23 

23 

23 

23 

18 

4158 

23 

23 

23 

23 

23 

23 

23 

23 

18 

4160 

23 

23 

23 

23 

23 

23 

23 

23 

18 

4168 

23 

23 

23 

23 

23 

23 

23 

23 

18 

4170 

23 

23 

23 

23 

23 

23 

23 

23 

18 

4178 

23 

23 

23 

0D 

23 

20 

20 

20 

F9 

SUM: 

6B 

D3 

C7 

00 1 
O i 

A6 

9A 

36 

68 : 

: 6F 

4180 

20 

20 

20 

53 

2D 

4F 

53 

20 

A2 

4188 

53 

57 

4F 

52 

44 

2F 

46 

4D 

51 

4190 

2D 

37 

20 

5A 

2D 

38 

30 

20 

93 

4198 

44 

65 

62 

75 

67 

67 

65 

72 

25 

41A0 

20 

63 

6F 

6D 

6D 

61 

6E 

64 

FF 

41A8 

20 

6D 

65 

6E 

75 

20 

20 

20 

35 

4 1B0 

20 

20 

20 

23 

0D 

23 

23 

23 

F9 

4 1B8 

23 

23 

23 

23 

23 

23 

23 

23 

18 

41C0 

23 

23 

23 

23 

23 

23 

23 

23 

18 

41C8 

23 

23 

23 

23 

23 

23 

23 

23 

18 

41D0 

23 

23 

23 

23 

23 

23 

23 

23 

18 

41D8 

23 

23 

23 

23 

23 

23 

23 

23 

18 

41E0 

23 

23 

23 

23 

23 

23 

23 

23 

18 

41E8 

23 

23 

23 

23 

23 

0D 

23 

20 

FF 

41F0 

42 

20 

20 

20 

20 

20 

20 

20 

22 

4 1F8 

20 

20 

20 

20 

20 

20 

20 

20 

00 

SUM: 

9B 

38 

1A 

A7 

29 

E0 

14 

D8 : 

: 89 

4200 

20 

23 

20 

44 

69 

73 

70 

6C 

5F 

4208 

61 

79 

20 

63 

75 

72 

72 

65 

IB 

4210 

6E 

74 

20 

62 

72 

65 

61 

6B 

07 

4218 

20 

70 

6F 

69 

6E 

74 

2E 

20 

98 

4220 

20 

20 

20 

20 

20 

23 

0D 

23 

F3 

4228 

20 

42 

20 

2A 

20 

20 

20 

20 

2C 

4230 

20 

20 

20 

20 

20 

20 

20 

20 

00 

4238 

20 

20 

23 

20 

52 

65 

6C 

65 

0B 

4240 

61 

73 

65 

20 

63 

75 

72 

72 

15 

4248 

65 

6E 

74 

20 

62 

72 

65 

61 

01 

4250 

6B 

20 

70 

6F 

69 

6E 

74 

2E 

E3 

4258 

20 

20 

20 

20 

20 

20 

23 

0D 

F0 

4260 

23 

20 

42 

20 

61 

64 

72 

31 

0D 

4268 

20 

20 

20 

20 

20 

20 

20 

20 

00 

4270 

20 

20 

20 

23 

20 

53 

65 

74 

CF 

4278 

20 

62 

72 

65 

61 

6B 

20 

70 

B5 

SUM: 

63 

05 

AF 

93 

C0 

3D 

AF 

67 

: BD 

4280 

6F 

69 

6E 

74 

20 

6F 

6E 

20 

D7 

4288 

28 

61 

64 

72 

31 

29 

2E 

20 

07 

4290 

20 

20 

20 

20 

20 

20 

20 

23 

03 

4298 

0D 

23 

20 

43 

20 

61 

64 

72 

EA 

42A0 

31 

2C 

61 

64 

72 

32 

20 

20 

06 

42A8 

20 

20 

20 

20 

23 

20 

43 

61 

67 

42B0 

6C 

69 

63 

75 

6C 

61 

74 

65 

53 

42B8 

20 

61 

64 

72 

31 

2B 

61 

64 

78 

42C0 

72 

32 

2C 

61 

64 

72 

31 

2D 

65 

42C8 

61 

64 

72 

32 

2E 

20 

20 

20 

F7 

42D0 

23 

0D 

23 

20 

4 4 

5B 

61 

64 

D7 

42D8 

72 

31 

5 B 

2C 

61 

64 

72 

32 

93 

4 2E0 

5D 

5D 

20 

20 

20 

23 

20 

44 

A1 

42E8 

75 

6D 

7 0 

20 

66 

72 

6F 

6D 

26 

42F0 

20 

61 

64 

72 

31 

20 

74 

6F 

8B 

42F8 

20 

61 

64 

72 

32 

2E 

20 

20 

F7 

SUM: 

IB 

83 

CB 

B7 

B3 

2B 

9F 

42 

: 12 

4300 

20 

20 

20 

20 

20 

20 

20 

20 

00 

4308 

20 

23 

0D 

23 

20 

46 

20 

61 

5A 

4310 

64 

72 

31 

2C 

61 

64 

72 

32 

9C 

4318 

2C 

64 

74 

20 

20 

20 

23 

20 

A7 

4320 

46 

69 

6C 

6C 

20 

66 

72 

6F 

EE 

432.8 

6D 

20 

61 

64 

72 

31 

20 

74 

89 

4330 

6F 

20 

61 

64 

72 

32 

20 

77 

8F 

4338 

69 

74 

68 

20 

64 

74 

2E 

20 

8B 

4340 

20 

20 

23 

0D 

23 

20 

47 

5B 

55 

4348 

61 

64 

72 

31 

5D 

20 

20 

20 

25 

4350 

20 

20 

20 

20 

20 

20 

20 

23 

03 

4358 

20 

47 

6F 

20 

6 P 

62 

6A 

65 

96 

4360 

63 

74 

20 

70 

72 

6F 

67 

72 

21 

4368 

61 

6D 

2E 

20 

20 

20 

20 

20 

9C 


4370 

20 

20 

20 

20 

20 

20 

20 

20 

: 00 

4378 

20 

20 

20 

23 

0D 

23 

20 

48 

: IB 

SUM: 

20 

42 

1A 

34 

F7 

BB 

6D 

4A 

: 19 

4380 

20 

20 

20 

20 

20 

20 

20 

20 

: 00 

4388 

20 

20 

20 

20 

20 

20 

20 

20 

: 00 

4390 

23 

20 

44 

69 

73 

70 

6C 

61 

: A0 

4398 

79 

20 

68 

65 

6C 

70 

20 

6D 

: CF 

4 3A0 

65 

73 

73 

61 

67 

65 

2E 

20 

: C6 

43A8 

20 

20 

20 

20 

20 

20 

20 

20 

: 00 

43B0 

20 

20 

20 

20 

23 

0D 

23 

20 

: F3 

43B8 

49 

20 

61 

64 

72 

31 

2C 

6C 

: 69 

43C0 

65 

74 

74 

65 

72 

20 

20 

20 

: 84 

43C8 

20 

23 

20 

49 

6E 

73 

65 

72 

: 64 

43D0 

74 

20 

6D 

65 

6D 

6F 

72 

79 

: 2D 

43D8 

20 

73 

74 

61 

6D 

70 

20 

6F 

: D4 

43E0 

6E 

20 

28 

61 

64 

72 

31 

29 

: 47 

43E8 

2D 

2E 

20 

20 

20 

23 

0D 

23 

: 0E 

43F0 

20 

4A 

20 

61 

64 

72 

31 

20 

: 12 

43F8 

20 

20 

20 

20 

20 

20 

20 

20 

: 00 

SUM: 

BE 

35 

FD 

89 

FD 

7C 

0F 

E0 

: El 

4400 

20 

20 

23 

20 

4A 

75 

6D 

70 

: IF 

4408 

20 

74 

6F 

20 

61 

64 

72 

31 

: 8B 

4410 

2E 

20 

20 

20 

20 

20 

20 

20 

: 0E 

4418 

20 

20 

20 

20 

20 

20 

20 

20 

: 00 

4420 

20 

20 

20 

20 

20 

20 

23 

0D 

: F0 

4428 

23 

2 0 

4D 

5B 

61 

64 

72 

31 

: 53 

4430 

5D 

20 

20 

20 

2 0 

20 

20 

20 

: 3D 

4438 

20 

20 

20 

23 

20 

45 

78 

63 

: C3 

4440 

68 

61 

6E 

67 

65 

20 

63 

6F 

: F5 

4448 

6E 

74 

65 

6E 

74 

73 

20 

6F 

: 2B 

4450 

66 

20 

6D 

65 

6D 

6F 

72 

79 

: IF 

4458 

2E 

20 

20 

20 

20 

20 

20 

23 

: 11 

4460 

0D 

23 

20 

50 

20 

20 

20 

20 

: 20 

4468 

20 

20 

20 

20 

20 

20 

20 

20 ; 

: 00 

4470 

20 

20 

20 

20 

23 

20 

43 

6F 

: 75 

4478 

6D 

70 

6C 

65 

6D 

65 

6E 

74 ; 

; 62 

SUM: 

72 

3C 

AB 

8D 

E2 

E9 

52 

3F : 

: 42 

4480 

20 

70 

72 

69 

6E 

74 

65 

72 

24 

4488 

20 

73 

77 

69 

74 

63 

68 

2E 

E0 

4490 

20 

20 

20 

20 

20 

20 

20 

20 

00 

4498 

23 

0D 

23 

20 

51 

20 

20 

20 

24 

44A0 

20 

20 

20 

20 

20 

20 

20 

20 

00 

44A8 

20 

20 

20 

20 

20 

23 

20 

51 

34 

44B0 

75 

69 

74 

20 

74 

6F 

20 

53 

C8 

4 4B8 

57 

4F 

52 

44 

2E 

20 

20 

20 

CA 

4 4C0 

20 

20 

20 

20 

20 

20 

20 

20 

00 

4 4C8 

20 

20 

20 

20 

20 

20 

20 

20 

00 

44D0 

20 

23 

0D 

23 

20 

52 

20 

20 

25 

4 4D8 

20 

20 

20 

20 

20 

20 

20 

20 

00 

44E0 

20 

20 

20 

20 

20 

20 

23 

20 

03 

4 4E8 

44 

69 

73 

70 

6C 

61 

79 

2F 

05 

4 4F0 

65 

78 

63 

68 

61 

6E 

67 

65 

43 

44F8 

20 

72 

65 

67 

69 

73 

74 

65 

13 

SUM: 

F8 

FE 

FA 

98 

0B 

FD 

84 

5D : 

71 

4500 

72 

73 

2E 

20 

20 

20 

20 

20 

B3 

4508 

20 

20 

23 

0D 

23 

20 

53 

20 

26 

4510 

61 

64 

72 

31 

2C 

61 

64 

72 

CB 

4518 

32 

2C 

64 

74 

20 

20 

20 

23 

B9 

4520 

20 

53 

65 

72 

63 

68 

20 

22 

57 

4528 

64 

74 

22 

20 

66 

72 

6F 

6D 

CB 

4530 

20 

61 

64 

72 

31 

20 

74 

6F 

8B 

4538 

20 

61 

64 

72 

32 

2E 

20 

20 

F7 

4540 

20 

20 

20 

23 

0D 

23 

20 

54 

27 

4548 

20 

61 

64 

72 

31 

2C 

61 

64 

79 

4550 

72 

32 

2C 

61 

64 

72 

33 

20 

5A 

4558 

23 

20 

54 

72 

61 

6E 

73 

66 

B1 

4560 

65 

72 

20 

66 

72 

6F 

6D 

20 

CB 

4568 

61 

64 

72 

31 

2D 

61 

64 

72 

CC 

4570 

32 

20 

74 

6F 

20 

61 

64 

72 

8C 

4578 

33 

2E 

20 

20 

23 

0D 

23 

23 

17 

SUM: 

E9 

A3 

A0 

D6 

A0 

56 

99 

58 : 

E9 

4580 

23 

23 

23 

23 

23 

23 

23 

23 

18 

4588 

23 

23 

23 

23 

23 

23 

23 

23 

18 

4590 

23 

23 

23 

23 

23 

23 

23 

23 

18 

4598 

23 

23 

23 

23 

23 

23 

23 

23 

18 

4 5A0 

23 

23 

23 

23 

23 

23 

23 

23 

18 

45A8 

23 

23 

23 

23 

23 

23 

23 

23 

18 

45B0 

23 

23 

23 

23 

23 

23 

0D 

00 

DF 

45B8 

50 

72 

69 

6E 

74 

65 

72 

20 

04 

45C0 

69 

73 

20 

65 

6E 

61 

62 

6C 

FE 

45C8 

65 

2E 

0D 

00 

50 

72 

69 

6E 

39 

45D0 

74 

65 

72 

20 

69 

73 

20 

64 

CB 

45D8 

69 

73 

65 

6E 

61 

62 

6C 

65 

43 

45E0 

2E 

0D 

00 

20 

20 

20 

20 

20 

DB 

45E8 

41 

46 

20 

20 

20 

42 

43 

20 

8C 

45F0 

20 

20 

44 

45 

20 

20 

20 

48 

71 

45F8 

4C 

20 

20 

20 

41 

46 

27 

20 

7A 

SUM: 

CB 

73 

E6 

FB 

92 

CA 

52 

3D : 

: 0A 

4600 

20 

42 

43 

27 

20 

20 

44 

45 

95 

4608 

27 

20 

20 

48 

4C 

27 

20 

20 

62 

4610 

49 

58 

20 

20 

20 

49 

59 

20 

C3 

4618 

20 

20 

53 

50 

20 

20 

20 

50 

93 

4620 

43 

0D 

2D 

52 

3E 

20 

00 

F3 

20 

4628 

16 

FB 

16 

4K 

17 

A4 

17 

F3 

3A 

4630 

16 

3B 

18 

72 

18 

A1 

18 

A7 

53 

4638 

18 

C0 

18 

F3 

16 

F3 

16 

CB 

CD 

4640 

18 

F3 

16 

F3 

16 

IB 

19 

35 

96 

4648 

19 

38 

19 

93 

19 

DE 

19 

F3 

00 

4650 

16 

F3 

16 

F3 

16 

F3 

16 

F3 

24 


4658 16 F3 16 13 IA FE 01 D8 : 23 
4660 FE 21 38 F7 C9 E6 DF FE : DA 
4668 41 D8 FE 5B 3F C9 F5 7E : ED 
4670 23 66 6F FI C9 FI ED 73 : 03 
4678 96 10 E3 22 98 10 E3 31 : 67 


SUM: 8C 5D 2C D5 F7 A5 0F 40 : D5 

4680 14 03 FD E5 DD E5 08 D9 : 9C 
4688 E5 D5 C5 F5 08 D9 E5 D5 : 0F 
4690 C5 F5 11 BB 10 CD 13 1C : 92 
4698 2A 98 10 2B CD E4 IB CD : 96 


46A0 

C8 

IB 

. 31 

00 

03 

21 

A2 16 

: F0 

46A8 

E5 

3E 

2D 

CD 

F5 

IB 

i 11 

00 

: 3E 

46B0 

01 

CD 

37 

1C 

CD 

5C 

16 

D8 

: 38 

46B8 

FE 

IB 

C8 

FE 

2D 

20 

17 

CD 

: 10 

46C0 

5B 

16 

D8 

CD 

65 

16 

38 

2B 

: F4 

46C8 

21 

27 

16 

D6 

41 

17 

4F 

06 

: El 

46D0 

00 

09 

CD 

6E 

16 

E9 

CD 

73 

: 83 

46D8 

1C 

38 

18 

CD 

5C 

16 

FE 

3E 

: E7 

46E0 

20 

11 

13 

CD 

5C 

16 

D8 

FE 

: 59 

46E8 

3A 

C8 

CD 

7C 

1C 

38 

04 

77 

: 1A 

46F0 

23 

18 

F0 

11 

CA 

10 

CD 

13 

: F6 

46F8 

1C 

18 

A7 

2A 

9F 

10 

CD 

5B 

: DC 

SUM: 

C5 

2D 

8A 

09 

AD 

Cl 

C3 

17 

: CD 

4700 

16 

30 

18 

11 

D1 

10 

CD 

13 

: 30 

4708 

1C 

3A 

9E 

10 

B7 

20 

06 

11 

: F2 

4710 

E2 

10 

C3 

13 

1C 

CD 

E4 

IB 

: BO 

4718 

C3 

C8 

IB 

FE 

2A 

20 

0F 

3A 

: 37 

4720 

9E 

10 

B7 

C8 

3 A 

A1 

10 

77 

: 8F 

4728 

AF 

32 

9E 

10 

18 

D5 

44 

4D 

: 0D 

4730 

CD 

73 

1C 

38 

BE 

3A 

9E 

10 

: 3a 

4738 

B7 

28 

04 

3A 

A1 

10 

02 

7E 

: 4E 

4740 

32 

A1 

10 

3E 

FF 

77 

32 

9E 

: 67 

4748 

10 

22 

9F 

10 

18 

B5 

CD 

5B 

: D6 

4750 

16 

CD 

73 

1C 

38 

9D 

CD 

5C 

: 70 

4758 

16 

38 

98 

FE 

2C 

20 

94 

44 : 

: 08 

4760 

4D 

CD 

5B 

16 

CD 

73 

1C 

38 : 

: IF 

4768 

8A 

50 

59 

EB 

CD 

S4 

IB 

E5 : 

: CF 

4770 

D5 

3E 

2B 

CD 

F5 

IB 

EB 

CD : 

: D3 

4778 

E4 

IB 

3E 

3D 

CD 

F5 

IB 

00 : 

: 57 

SUM: 

A6 

5D 

E0 

EF 

56 

2D 

57 

4E : 

: FA 

4780 

19 

CD 

B4 

IB 

D1 

El 

CD 

C8 : 

: 2C 

4788 

IB 

CD 

E4 

IB 

3E 

2D 

CD 

F5 : 

: 14 

4790 

IB 

EB 

CD 

E4 

IB 

3E 

3D 

CD : 

: 1A 

4798 

F5 

IB 

EB 

B7 

ED 

52 

CD 

E4 

: A2 

47A0 

1 B 

C3 

C8 

IB 

2A 

9A 

10 

CD 

: 62 

47A8 

5B 

16 

38 

09 

GD 

73 

1C 

DA : 

: E8 

47B0 

F3 

16 

22 

9A 

10 

24 

2E 

00 : 

27 

47B8 

CD 

5C 

16 

38 

12 

FE 

2C 

C2 : 

75 

4 7C0 

F3 

16 

CD 

5B 

16 

CD 

73 

1C : 

A3 

47C8 

DA 

F3 

16 

11 

10 

00 

19 

3E : 

5B 

47D0 

F0 

A5 

6F 

22 

9C 

10 

2A 

9A : 

96 

47D8 

10 

3E 

F0 

A5 

6F 

11 

E8 

10 : 

5B 

47E0 

CD 

13 

1C 

01 

00 

10 

CD 

E4 : 

BE 

47E8 

IB 

11 

38 

11 

CD 

13 

1C 

7E : 

EF 

47F0 

81 

4F 

7E 

23 

CD 

E9 

IB 

CD : 

0F 

47F8 

DF 

IB 

10 

F3 

11 

3C 

11 

CD : 

28 

SUM: 

8F 

65 

DC 

22 

0C 

03 

DD 

D7 : 

B5 

4800 

13 

1C 

79 

CD 

E9 

IB 

11 

3F 

C9 

4808 

11 

CD 

13 

1C 

11 

F0 

FF 

19 

26 

4810 

06 

10 

7E 

FE 

21 

30 

02 

3E 

23 

4818 

20 

CD 

F5 

IB 

23 

10 

F3 

CD 

F0 

4820 

C8 

IB 

22 

9A 

10 

CD 

3A 

1C 

D2 

4828 

C8 

ED 

5B 

9C 

10 

B7 

ED 

52 

B2 

4830 

19 

C8 

7D 

B7 

20 

AD 

CD 

C8 

77 

4838 

IB 

18 

A2 

CD 

5B 

16 

CD 

73 

53 

4840 

1C 

DA 

F3 

16 

CD 

5C 

16 

FE 

3C 

4848 

2C 

C2 

F3 

16 

44 

4D 

CD 

5B 

B0 

4850 

16 

CD 

73 

1C 

DA 

F3 

16 

CD 

22 

4858 

5C 

16 

FE 

2C 

C2 

F3 

16 

CD 

34 

4860 

5B 

16 

CD 

7C 

1C 

DA 

F3 

16 

B9 

4868 

23 

02 

03 

B7 

BD 

42 

09 

20 

37 

4870 

F8 

C9 

CD 

5B 

16 

38 

0E 

CD 

12 

4878 

73 

1C 

DA 

F3 

16 

EB 

00 

2A 

87 

SUM: 

B1 

2A 

69 

B 1 

BB 

60 

DF 

2C : 

IB 

4880 

96 

10 

73 

23 

72 

31 

00 

03 : 

E2 

4888 

FI 

Cl 

D1 

El 

08 

D9 

FI 

Cl : 

F7 

4890 

D1 

El 

08 

D9 

DD 

E5 

FD 

E5 : 

37 

4898 

ED 

7B 

96 

10 

E3 

2B 

E3 

FB : 

FA 

48A0 

C9 

11 

43 

11 

C3 

13 

1C 

CD : 

BD 

48A8 

5B 

16 

CD 

73 

1C 

DA 

F3 

16 : 

B0 

48B0 

CD 

5C 

16 

FE 

2C 

C2 

F3 

16 : 

34 

48B8 

13 

1A 

B7 

C8 

77 

23 

18 

F8 : 

56 

48C0 

CD 

5B 

16 

CD 

73 

1C 

DA 

F3 : 

67 

48C8 

16 

FB 

E9 

2A 

9A 

10 

CD 

5B : 

F6 

48D0 

16 

38 

06 

CD 

73 

1C 

DA 

F3 : 

7D 

48D8 

16 

CD 

B4 

IB 

3E 

3A 

CD 

F5 : 

1C 

48E0 

IB 

7E 

CD 

E9 

IB 

3E 

2D 

CD : 

A2 

48E8 

F5 

IB 

11 

00 

01 

CD 

37 

1C : 

42 

48F0 

1A 

B7 

28 

27 

FE 

IB 

C8 

CD : 

CE 

48F8 

5C 

16 

CD 

73 

1C 

DA 

F3 

16 : 

B 1 

SUM*. 

DE 

8B 

7B 

99 

B0 

6E 

58 

97 : 

8A 

4900 

1A 

FE 

3A 

C2 

F3 

16 

13 

13 : 

43 

4908 

13 

1A 

FE 

2D 

C2 

F3 

16 

CD : 

F0 

4910 

5B 

16 

38 

07 

CD 

7C 

1C 

DA : 

EF 

4918 

F3 

16 

77 

23 

18 

BB 

3A 

7C : 

2C 

4920 

IF 

B7 

20 

01 

3E 

AF 

32 

7C : 

92 

4928 

IF 

11 

B8 

15 

B7 

20 

03 

11 : 

E8 

4930 

CC 

15 

C3 

13 

1C 

C3 

29 

IB : 

DA 

4938 

21 

00 

03 

CD 

5B 

16 

30 

2A : 

BC 


132 Oh! MZ 1987.8. 
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4. 


HE SENTINEL 


4940 

11 

E3 

15 

CD 

13 

1C 

06 

0A 

15 

4B98 

20 

30 

47 

57 

67 

77 

21 

20 : 

: 0D 

SUM: 

52 

IE 

6B 

99 

0E 

5E 

3C 

78 

: 94 

4948 

E5 

CD 

6E 

16 

CD 

E4 

IB 

El 

E3 

4BA0 

40 

C9 

00 

50 

19 

00 

19 

00 : 

: 8B 











4950 

CD 

DF 

IB 

23 

23 

10 

FI 

2A 

38 

4BA8 

00 

01 

21 

A3 

IB 

FE 

29 

3E : 

: 45 

4E00 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

4958 

96 

10 

CD 

E4 

IB 

CD 

DF 

IB 

39 

4BB0 

28 

38 

01 

17 

32 

5C 

IF 

77 : 

: 9C 

4E08 

00 

00 

00 

00 

E3 

F5 

7E 

23 : 

: 79 

4960 

CD 

6E 

16 

2B 

CD 

E4 

IB 

C3 

0B 

4BB8 

2B 

CF 

01 

B7 

C9 

F5 

E5 

CF : 

: 24 

4E10 

32 

82 

00 

FI 

E3 

FD 

E5 

DD 

: 47 

4968 

C8 

IB 

FE 

3E 

C2 

F3 

16 

06 

F0 

4BC0 

0E 

7D 

El 

B7 

20 

0 3 

FI 

C9 : 

: 00 

4E18 

E5 

E5 

D5 

C5 

F5 

08 

D9 

E5 : 

: IF 

4970 

0A 

CD 

5B 

16 

D8 

E5 

CD 

73 

45 

4BC8 

F5 

3E 

0D 

18 

29 

F5 

3E 

07 : 

: BB 

4E20 

D5 

C5 

F5 

F5 

ED 

73 

80 

00 : 

: 64 

4978 

1C 

DA 

F3 

16 

4D 

7C 

El 

71 

1A 

4BD0 

18 

24 

3A 

83 

00 

90 

3F 

D8 : 

: A0 

4E28 

AF 

32 

05 

FD 

00 

FI 

38 

0F 

: IB 











4BD8 

CD 

DF 

IB 

3C 

20 

FA 

C9 

F5 : 

: DB 

4E30 

FI 

Cl 

D1 

El 

08 

D9 

FI 

Cl 

: F7 

SUM: 

BA 

F0 

52 

8E 

D8 

FD 

DD 

E5 

21 

4BE0 

3E 

20 

18 

12 

7C 

CD 

E9 

IB : 

: D5 

4E38 

D1 

El 

DD 

El 

FD 

El 

C9 

11 ; 

: 28 











4BE8 

7D 

F5 

0F 

0F 

0F 

0F 

CD 

F2 : 

: 6D 

4E40 

52 

IE 

CD 

13 

1C 

21 

14 

00 : 

: Al 

4980 

23 

77 

23 

10 

EC 

CD 

5B 

16 

F7 

4BF0 

IB 

FI 

CD 

6B 

1C 

F5 

CF 

0A : 

: 2E 

4E48 

39 

F9 

El 

2B 

CD 

E4 

IB 

C3 : 

CD 

4988 

D8 

CD 

73 

1C 

DA 

F3 

16 

22 

39 

4BF8 

CD 

IE 

1C 

CF 

12 

FI 

C9 

E3 : 

: 85 

4E50 

80 

10 

0D 

49 

6C 

6C 

69 

67 : 

: 8E 

4990 

96 

10 

C9 

CD 

5B 

16 

CD 

73 

ED 











4E58 

61 

6C 

20 

73 

79 

73 

74 

65 : 

: 25 

4998 

1C 

DA 

F3 

16 

44 

4D 

CD 

5C 

B9 

SUM: 

1A 

89 

77 

19 

EA 

69 

87 

C6 : 

: D3 

4E60 

6D 

20 

63 

61 

6C 

6C 

20 

64 : 

: AD 

49A0 

16 

FE 

2C 

C2 

F3 

16 

CD 

5B 

33 











4E68 

65 

74 

6 5 

63 

7 4 

64 

65 

64 : 

; 42 

49A8 

16 

CD 

73 

1C 

DA 

F3 

16 

CD 

22 

4C00 

EB 

CD 

13 

1C 

EB 

F5 

7E 

23 : 

: 68 

4E70 

20 

6 1 

7 4 

20 

24 

00 

0 0 

00 : 

: 39 

49B0 

5C 

16 

FE 

2C 

C2 

F3 

16 

CD 

34 

4C08 

B7 

20 

FB 

FI 

E3 

C9 

F5 

3E : 

: A2 

4E78 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

49B8 

5B 

16 

CD 

7C 

1C 

DA 

F3 

16 

B9 

4C10 

0D 

18 

02 

F5 

AF 

CF 

0D 

CD ; 

: 74 











49C0 

50 

59 

EB 

13 

BE 

20 

08 

08 

95 

4C18 

IE 

1C 

CF 

13 

FI 

C9 

E5 

2A : 

: E5 

SUM: 

BB 

88 

94 

48 

7F 

CC 

3F 

ID 

: C6 

49C8 

CD 

E4 

IB 

CD 

DF 

IB 

08 

23 

BE 

4C20 

7C 

IF 

2C 

2D 

El 

C0 

FI 

FI : 

: 77 











49D0 

CD 

3A 

1C 

28 

06 

B7 

ED 

52 

47 

4C28 

C9 

CF 

12 

C9 

F5 

18 

02 

F5 : 

: 77 

4E80 

00 

00 

00 

0 0 

0 0 

00 

0 0 

00 

00 

49D8 

19 

20 

E9 

C3 

C8 

IB 

CD 

5B 

F0 

4C30 

3E 

AF 

32 

7C 

IF 

FI 

C9 

CF : 

: 43 

4E88 

00 

00 

00 

00 

00 

00 

00 

00 

00 

49E0 

16 

CD 

73 

1C 

DA 

F3 

16 

CD 

22 

4C38 

0B 

C9 

CF 

09 

C9 

CF 

08 

C9 : 

: 15 

4E90 

0 0 

00 

00 

0 0 

00 

00 

00 

00 

00 

49E8 

5C 

16 

FE 

2C 

C2 

F3 

16 

22 

89 

4C40 

CF 

07 

C9 

CF 

0E 

C9 

CF 

10 : 

: 24 

4E98 

00 

00 

00 

00 

00 

00 

00 

00 

00 

49F0 

9A 

10 

CD 

5B 

16 

CD 

73 

1C 

44 

4C48 

C9 

CF 

0F 

C9 

CF 

08 

B7 

28 : 

: 26 

4EA0 

00 

00 

00 

0 0 

00 

00 

00 

00 

00 

49F8 

DA 

F3 

16 

CD 

5C 

16 

FE 

2C 

4C 

4C50 

0E 

FE 

IB 

28 

0F 

FE 

20 

20 : 

: 9C 

4EA8 

00 

00 

00 

00 

00 

00 

00 

00 

00 














07 

FE 

1B 

28 

05 

E3 

05 

4EB0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

SUM: 

79 

A2 

IB 

D0 

89 

CF 

5E 

21 

DD 

4C60 

23 

23 

E3 

C9 

E3 

7E 

23 

66 : 

: DC 

4EB8 

00 

00 

00 

00 

00 

00 

00 

00 

00 











4C68 

6F 

E3 

C9 

F6 

F0 

27 

C6 

A0 : 

; 8E 

4EC0 

00 

00 

00 

00 

00 

0 0 

00 

00 

00 

4 A00 

C2 

F3 

16 

22 

9C 

10 

CD 

5B 

Cl 

4C70 

CE 

40 

C9 

CD 

7C 

1C 

67 

D4 : 

; 77 

4EC8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

4A08 

16 

CD 

73 

1C 

DA 

F3 

16 

ED 

42 

4C78 

7C 

1C 

6F 

C9 

C5 

1A 

13 

CD : 

: 8F 

4ED0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

4A10 

5B 

9C 

10 

13 

B7 

ED 

52 

19 

29 











4ED8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

4A18 

30 

23 

ED 

5B 

9A 

10 

B7 

ED 

E9 

SUM: 

E3 

8C 

FC 

A3 

47 

C0 

37 

B8 : 

: 04 

4EE0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

4A20 

52 

19 

C8 

38 

18 

EB 

2A 

9C 

34 











4EE8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

4A28 

10 

ED 

4B 

9A 

10 

B7 

ED 

42 

D8 

4C80 

93 

1C 

38 

0D 

0F 

0F 

0F 

0F 

30 

4EF0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

4A30 

44 

4D 

62 

6B 

09 

EB 

2A 

9C 

18 

4C88 

4F 

1A 

13 

CD 

93 

1C 

38 

01 

31 

4EF8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

4A38 

10 

03 

ED 

B8 

C9 

54 

5D 

2A 

5C 

4C90 

B1 

Cl 

09 

D6 

30 

D8 

FB 

0A 

21 











4A40 

9C 

10 

ED 

4B 

9A 

10 

B7 

ED 

32 

4C98 

38 

07 

FE 

11 

D8 

D6 

07 

FE 

01 

SUM: 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

4A48 

42 

44 

4D 

2A 

9A 

10 

03 

ED 

97 

4CA0 

10 

3F 

C9 

EB 

CF 

16 

EB 

C9 

9C 











4A50 

B0 

C9 

00 

00 

00 

00 

00 

00 

79 

4CA8 

EB 

CF 

17 

EB 

C9 

CF 

16 

13 

7D 

4F00 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

4A58 

00 

00 

00 

00 

00 

00 

00 

00 

00 

4CB0 

77 

23 

0B 

78 

B1 

30 

F6 

C9 

BD 

4F08 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

4A60 

00 

00 

00 

00 

00 

00 

00 

00 

00 

4CB8 

7E 

23 

CF 

17 

13 

0B 

78 

B1 

CE 

4F10 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

4A68 

00 

00 

00 

00 

00 

00 

00 

00 

00 

4CC0 

20 

F6 

C9 

C5 

06 

FD 

1A 

Cl 

82 

4F18 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

4A70 

00 

00 

00 

00 

00 

00 

00 

00 

00 

4CC8 

17 

CB 

IF 

C9 

C5 

06 

FD 

02 

94 

4F20 

00 

00 

00 

0 0 

00 

00 

00 

00 : 

: 00 

4A78 

00 

00 

00 

00 

00 

00 

00 

00 

00 

4CD0 

Cl 

C9 

CF 

IE 

CD 

B9 

1C 

D5 

IE 

4F28 

00 

00 

00 

00 

00 

00 

00 

00 ; 

: 00 











4CD8 

21 

FA 

ID 

1 1 

00 

07 

01 

12 

63 

4F30 

00 

00 

00 

00 

00 

00 

00 

00 

: 00 

SUM: 

A7 

F2 

22 

16 

F5 

01 

44 

CC : 

: D7 

4CE0 

00 

ED 

B0 

D 1 

CD 

Cl 

ID 

B7 

D0 

4F38 

00 

00 

00 

00 

00 

00 

00 

O0 : 

: 00 











4CE8 

C9 

21 

FA 

ID 

77 

23 

32 

IF 

EC 

4F40 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

4A80 

00 

00 

00 

00 

00 

00 

00 

00 

00 

4CF0 

29 

CD 

4B 

ID 

CD 

15 

29 

D8 

41 

4F48 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

4A88 

00 

00 

00 

00 

00 

00 

00 

00 

00 

4CF8 

32 

5D 

IF 

06 

0D 

CD 

37 

ID 

E2 

4F50 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

4A90 

00 

00 

00 

00 

00 

00 

00 

00 

00 











4F58 

00 

00 

00 

19 

50 

41 

0E 

00 : 

: B8 

4A98 

00 

00 

00 

00 

00 

00 

00 

00 

00 

SUM: 

F8 

0B 

B4 

F4 

BC 

B2 

9E 

E3 : 

: 9D 

4F60 

10 

00 

00 

2E 

00 

2F 

50 

00 : 

: BD 

4 AA0 

00 

00 

00 

00 

00 

00 

00 

00 

00 











4F68 

00 

80 

FF 

FB 

00 

04 

00 

00 : 

; 7E 

4AA8 

00 

00 

00 

00 

00 

00 

0 0 

00 

00 

4D00 

CD 

8D 

ID 

20 

01 

IB 

77 

13 

3D 

4F70 

00 

00 

00 

00 

00 

07 

00 

06 : 

: 0D 

4AB0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

4D08 

23 

10 

F2 

1A 

FE 

2E 

.20 

01 

8C 

4F78 

84 

00 

83 

00 

00 

00 

00 

21 : 

: 28 

4AB8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

4D10 

13 

06 

03 

CD 

37 

ID 

77 

13 

C7 











4AC0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

4D18 

2 3 

10 

F8 

36 

20 

3A 

5D 

IF 

37 

SUM: 

94 

80 

82 

42 

50 

7B 

5E 

27 : 

: 28 

4AC8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

4D20 

CD 

18 

29 

C0 

FE 

53 

C8 

21 

08 











4AD0 

00 

00 

00 

00 

00 

00 

0 0 

00 

00 

4D28 

0B 

IE 

06 

11 

7 E 

FE 

21 

D0 

AD 

4F80 

El 

E9 

00 

00 

00 

00 

00 

00 

CA 

4AD8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

4D30 

3E 

0D 

77 

2B 

10 

F6 

C9 

D5 

91 

4F88 

00 

00 

00 

00 

00 

00 

C3 

80 

43 

4AE0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

4D38 

CD 

Cl 

ID 

1A 

D1 

FE 

3A 

28 

F6 

4F90 

10 

00 

B3 

1C 

C3 

A3 

1C 

00 

61 

4 AE8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

4D40 

06 

FB 

20 

38 

02 

1A 

C9 

3E 

7F 

4F98 

BE 

1C 

C3 

A8 

1C 

C3 

62 

ID 

A3 

4AF0 

00 

00 

00 

00 

0*0 

00 

00 

00 

00 

4D48 

20 

IB 

C9 

CD 

Cl 

ID 

13 

1A 

DC 

4FA0 

C3 

93 

ID 

C3 

D4 

1C 

C3 

4F 

38 

4AF8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

4D50 

IB 

FE 

3 A 

C2 

AI) 

25 

1A 

13 

14 

4FA8 

23 

C3 

7C 

23 

C3 

2D 

23 

C3 

5B 











4D58 

13 

FE 

61 

D8 

FE 

7B 

D0 

D6 

69 

4FB0 

B3 

22 

C3 

73 

1C 

C3 

7C 

1C 

82 

SUM: 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

4D60 

20 

C9 

11 

01 

07 

0 6 

0D 

1A 

2F 

4FB8 

C3 

93 

1C 

C3 

6B 

1C 

C3 

E4 

63 











4D68 

CD 

41 

ID 

CD 

8D 

ID 

CD 

F5 

64 

4FC0 

IB 

C3 

B9 

IB 

C3 

CD 

IB 

C3 

50 

4B00 

C3 

29 

IB 

C3 

0C 

IE 

C3 

IB 

D2 

4D70 

IB 

13 

10 

F3 

3E 

2E 

CD 

F5 

5F 

4FC8 

4C 

1C 

C3 

4 0 

1C 

C3 

3A 

1C 

A0 

4B08 

IB 

C3 

IB 

IB 

C3 

IB 

IB 

C3 

D0 

4D78 

IB 

06 

03 

1A 

CD 

41 

ID 

CD 

36 

4FD0 

C3 

3D 

1C 

C3 

37 

1C 

C3 

2C 

21 

4B10 

IB 

IB 

C3 

IB 

IB 

C3 

1C 

IB 

29 











4FD8 

1C 

C3 

2F 

1C 

C3 

29 

1C 

C3 

F5 

4B18 

C3 

IB 

IB 

C9 

F5 

ED 

57 

EA 

E5 

SUM: 

80 

EF 

92 

CD 

C0 

4E 

El 

46 : 

: 03 

4FE0 

D2 

IB 

C3 

FF 

IB 

C3 

13 

1C 

BC 

4B20 

75 

16 

CF 

00 

FI 

FB 

C9 

ED 

FC 











4FE8 

C3 

0E 

1C 

C3 

BD 

IB 

C3 

C8 

13 

4B28 

45 

F3 

ED 

56 

31 

00 

04 

3E 

EE 

4D80 

F5 

IB 

13 

10 

F6 

CF 

08 

FE 

FE 

4FF0 

IB 

C3 

DF 

IB 

C3 

F5 

IB 

C3 

6E 

4B30 

50 

CD 

AA 

IB 

3E 

3F 

CF 

02 

30 

4D88 

20 

C0 

CF 

0 7 

C9 

FE 

2E 

C0 

6B 

4FF8 

9E 

IB 

C3 

00 

21 

C3 

29 

IB 

A4 

4B38 

21 

8C 

IB 

CF 

03 

3E 

07 

CF 

AE 

4D90 

3B 

20 

C9 

E6 

87 

47 

21 

00 

FC 











4B40 

04 

3E 

44 

CF 

05 

21 

96 

IB 

2C 

4D98 

07 

7E 

B 6 

87 

B8 

20 

ID 

3A 

21 

SUM: 

9F 

F6 

66 

F7 

92 

F9 

B4 

3F 

: 70 

4B48 

06 

08 

7E 

23 

CF 

06 

10 

FA 

8E 

4DA0 

20 

29 

F5 

3A 

5D 

IF 

32 

20 

46 











4B50 

21 

00 

80 

22 

68 

IF 

AF 

32 

2B 

4DA8 

29 

CD 

E9 

1C 

FI 

32 

20 

29 

67 

5000 

C3 

44 

25 

C3 

5A 

25 

C3 

19 : 

: 4 A 

4B58 

7C 

IF 

32 

7D 

IF 

21 

00 

16 

A0 

4DB0 

11 

00 

07 

21 

FA 

ID 

06 

10 

66 

5008 

24 

C3 

FA 

22 

C3 

08 

25 

C3 : 

B6 

4B60 

CF 

0F 

CD 

FF 

IB 

0C 

3C 

3C 

49 

4DB8 

CD 

C7 

ID 

C0 

3E 

08 

B7 

C9 

37 

5010 

26 

25 

C3 

AC 

24 

C3 

77 

24 : 

: 3C 

4B68 

3C 

3C 

3C 

20 

53 

2D 

4F 

53 

F6 

4DC0 

13 

1A 

FE 

20 

28 

FA 

C9 

13 

49 

5018 

C3 

43 

1C 

C3 

46 

1C 

C3 

49 : 

53 

4B7 0 

20 

53 

57 

4F 

52 

44 

20 

3E 

0D 

4DC8 

23 

7E 

FE 

21 

30 

02 

AF 

C9 

6A 

5020 

1C 

C3 

40 

1C 

C3 

AD 

25 

C3 : 

93 

4B78 

3E 

3E 

3E 

3E 

0D 

00 

3E 

01 

44 

4DD0 

7E 

CD 

8D 

ID 

4F 

1A 

CD 

8D 

B8 

5028 

C9 

25 

C3 

C3 

1C 

C3 

CC 

1C : 

3B 











4DD8 

ID 

B9 

CO 

FE 

0D 

C8 

23 

13 

9F 

5030 

C3 

AA 

IB 

C3 

6C 

28 

C3 

D2 : 

74 

SUM: 

F7 

C5 

A7 

3F 

6A 

45 

32 

0A : 

: 8D 

4DE0 

10 

EE 

AF 

C9 

C3 

F6 

ID 

C3 

0F 

5038 

1C 








1C 











4DE8 

F6 

ID 

C3 

F6 

ID 

C3 

F6 

ID 

BF 











4B80 

32 

A8 

IB 

AF 

32 

5F 

IB 

FB : 

: 4B 

4DF0 

C3 

F6 

ID 

C3 

F6 

ID 

3E 

02 

EC 

SUM: 

94 

01 

1C 

F6 

D2 

A4 

D6 

FA : 

ED 

4B88 

2A 

7E 

IF 

E9 

80 

80 

80 

80 : 

B0 

4DF8 

37 

C9 

00 

00 

00 

00 

00 

00 

00 











4B90 

80 

80 

80 

80 

80 

80 

00 

10 : 

10 
































U X b 2 


r £ 















4080 

00 

00 

FF 

00 

00 

00 

00 

00 

FF 

40F0 

06 

CC 

00 

00 

FD 

10 

9B 

34 : 

: AE 

4148 

AE 

86 

6E 

84 

11 

5C 

11 

90 : 

: 34 

4088 

00 

00 

00 

00 

00 

00 

00 

00 

00 

40F8 

08 

86 

10 

IF 

8B 

10 

8E 

10 : 

: F6 

4150 

11 

5D 

11 

61 

11 

6A 

11 

72 : 

: DE 

4090 

00 

00 

00 

00 

00 

00 

00 

00 

00 











4158 

11 

7A 

11 

82 

39 

0A 

83 

27 

: 0B 

4098 

00 

0 4 

00 

00 

00 

D6 

92 

27 

93 

SUM: 

ED 

F4 

63 

E2 

21 

A4 

5A 

03 : 

: 48 

4160 

27 

9E 

9B 

A6 

80 

30 

86 

9F 

: DB 

40A0 

0B 

DE 

9B 

E6 

C0 

DF 

9B 

DE 

82 











4168 

9B 

39 

96 

8B 

85 

40 

27 

FI 

: D2 

40A8 

87 

33 

C5 

39 

DE 

87 

39 

D6 

2C 

4100 

83 

0F 

92 

9D 

CB 

8E 

11 

0E 

39 

4170 

20 

16 

96 

8B 

85 

4 0 

26 

E9 

: 2B 

40B0 

92 

27 

F9 

2B 

0B 

DE 

9B 

E6 

47 

4108 

AE 

85 

AD 

84 

20 

F5 

11 

16 

A0 

4178 

20 

0E 

96 

8B 

85 

0 1 

27 

El ; 

: DD 

40B8 

C0 

DF 

9B 

DE 

95 

33 

C5 

39 

DE 

4110 

14 

40 

14 

65 

15 

43 

96 

80 

3B 











40C0 

DE 

9B 

E6 

C0 

DF 

9B 

DE 

97 

0E 

4118 

84 

0F 

48 

8E 

1 1 

22 

AE 

86 

D0 

SUM: 

51 

0B 

64 

93 

09 

75 

5D 

6E : 

: 9C 

40C8 

33 

C5 

39 

9E 

9B 

A6 

80 

9F 

2F 

4120 

6E 

84 

11 

42 

11 

99 

11 

D8 

D8 











40D0 

9B 

97 

80 

84 

07 

97 

82 

96 

EC 

4128 

12 

34 

12 

66 

12 

97 

12 

CC 

45 

4180 

20 

06 

96 

8B 

85 

01 

26 

D9 : 

: CC 

4 0D8 

80 

44 

44 

44 

84 

07 

97 

81 

EF 

4130 

12 

E6 

11 

42 

11 

B7 

12 

05 

2A 

4188 

DC 

9B 

C3 

00 

01 

DD 

9B 

39 : 

: EC 

40E0 

96 

80 

5F 

48 

59 

48 

59 

58 

0F 

4138 

12 

4C 

12 

66 

12 

97 

12 

CC 

5D 

4190 

DC 

8A 

9E 

93 

DD 

93 

9F 

8A : 

30 

40E8 

39 

CC 

IE 

2D 

FD 

10 

9B 

20 

18 

4140 

12 

E6 

96 

81 

48 

8E 

11 

4C 

42 

4198 

39 

96 

81 

81 

06 

27 

0D 

33 : 

3E 
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41A0 

A6 

9E 

9B 

E6 

80 

A6 

80 

9F 

0A 

4488 

15 

23 

15 

2C 

15 

35 

9E 

9B 

FC 

SUM: 

5F 

36 

E4 

4F 

0A 

F4 

35 

88 

: 83 

41A8 

9B 

ED 

C4 

39 

9E 

9B 

EC 

81 

2B 

4490 

E6 

80 

9F 

9B 

20 

DC 

1C 

FE 

B6 











4 1B0 

9F 

9B 

D7 

99 

97 

9A 

39 

96 

AA 

4498 

D6 

8A 

D9 

89 

IF 

A8 

D7 

8A 

EA 

4780 

39 

96 

81 

81 

06 

27 

0B 

EC 

F5 

4 1B8 

81 

84 

06 

81 

06 

27 

11 

EC 

B6 

44A0 

5F 

85 

20 

27 

02 

CA 

10 

44 

4B 

4788 

A6 

9E 

99 

A7 

82 

E7 

82 

9F 

0E 

4 1C0 

A6 

D3 

87 

DD 

87 

96 

8B 

84 

09 

44A8 

24 

02 

CA 

01 

44 

24 

02 

CA 

25 

4790 

99 

39 

D6 

8A 

96 

8B 

9B 

99 

8A 

41C8 

C4 

24 

02 

8A 

01 

97 

8B 

39 

D0 

44B0 

04 

44 

24 

02 

CA 

40 

44 

24 

E0 

4798 

ED 

83 

9F 

9 9 

39 

96 

81 

84 

7C 

4 1D0 

DC 

99 

D3 

87 

DD 

87 

20 

ED 

40 

44B8 

02 

CA 

80 

D7 

8B 

39 

D6 

8B 

48 

47A0 

06 

8B 

17 

A8 

AE 

86 

6E 

84 

79 

4 1D8 

96 

81 

81 

04 

24 

05 

D6 

8A 

25 

4 4C0 

54 

20 

D5 

C6 

02 

D7 

8B 

D6 

49 

47A8 

16 

C0 

18 

3B 

18 

99 

18 

56 

48 

4 1E0 

E7 

B6 

39 

26 

11 

9E 

9B 

E6 

2C 

44C8 

8A 

D7 

80 

D0 

89 

IF 

A8 

D7 

D8 

47B0 

9D 

CB 

34 

04 

96 

82 

81 

06 

3F 

41E8 

80 

A6 

80 

9F 

9B 

IF 

01 

DC 

DC 

44D0 

8A 

D6 

89 

C4 

0F 

D7 

89 

D6 

F2 

47B8 

26 

05 

9D 

9D 

E6 

C4 

8E 

E6 

83 

4 1F0 

87 

E7 

84 

A7 

01 

39 

9E 

9B 

0C 

44D8 

80 

C4 

0F 

D1 

89 

D6 

8B 

24 

32 

47C0 

A6 

D7 

89 

35 

02 

8E 

17 

CC 

AE 

4 1F8 

E6 

80 

A6 

80 

9F 

9B 

IF 

01 

E6 

44E0 

C6 

CA 

10 

20 

C2 

D6 

8B 

C5 

A8 

47C8 

AE 

86 

6E 

84 

17 

D4 

17 

EE 

16 











44E8 

01 

27 

D8 

D6 

8A 

C4 

0F 

27 

5A 

47D0 

18 

16 

18 

0B 

96 

81 

48 

8E 

3E 

SUM: 

22 

3F 

74 

B6 

F9 

E4 

88 

03 

F3 

44F0 

03 

C6 

02 

8E 

C6 

12 

D7 

8B 

93 

47D8 

17 

DE 

AE 

86 

6E 

84 

13 

07 

35 











44F8 

D6 

8A 

C0 

01 

IF 

A8 

D7 

8A 

49 

47E0 

13 

29 

13 

3D 

13 

58 

13 

F2 

FC 

4200 

96 

8 A 

A7 

84 

39 

96 

81 

84 

IF . 











47E8 

13 

F7 

13 

FC 

14 

03 

96 

89 

4F 

4208 

06 

81 

04 

24 

05 

E6 

B6 

D7 

27 

SUM: 

F6 

52 

C6 

C4 

57 

FC 

61 

96 : 

: 1C 

47F0 

D6 

81 

8E 

18 

2B 

A5 

85 

26 

78 

4210 

8A 

39 

26 

11 

9E 

9B 

E6 

80 

99 











47F8 

09 

D6 

8B 

C4 

01 

CA 

50 

D7 

20 

4218 

A6 

80 

9F 

9B 

IF 

01 

E6 

84 

EA 

4500 

D6 

8B 

44 

24 

02 

CA 

01 

44 

DA 











4220 

A6 

01 

DD 

87 

39 

9E 

9B 

E6 

63 

4508 

24 

BB 

CA 

04 

20 

B7 

96 

8A 

A4 

SUM: 

CC 

D6 

8B 

2E 

09 

C5 

48 

35 : 

A6 

4228 

80 

A6 

80 

9F 

9B 

IF 

01 

A6 

A6 

4510 

94 

89 

97 

8A 

C6 

10 

4D 

26 

87 











4230 

84 

97 

BA 

39 

96 

81 

81 

06 

7C 

4518 

03 

CA 

40 

4D 

2A 

02 

CA 

80 

D0 

4800 

8B 

39 

D6 

8B 

C4 

01 

CA 

10 : 

C4 

4238 

27 

0A 

33 

A6 

EC 

C4 

C3 

00 

7D 

4520 

7E 

13 

DD 

96 

8A 

98 

89 

97 

46 

4808 

D7 

8B 

39 

96 

89 

D6 

81 

8E : 

9F 

4240 

01 

ED 

C4 

39 

DC 

99 

C3 

00 

23 

4528 

8A 

5F 

20 

BA 

96 

8A 

9A 

89 

36 

4810 

18 

2B 

AA 

85 

20 

09 

96 

89 : 

BA 

4248 

01 

DD 

99 

39 

96 

81 

84 

06 

51 

4530 

97 

8A 

5F 

20 

El 

C6 

02 

D7 

20 

4818 

D6 

81 

8E 

18 

33 

A4 

85 

D6 : 

: 2F 

4250 

81 

06 

27 

0A 

33 

A6 

EC 

C4 

41 

4538 

8B 

D6 

8A 

D7 

80 

D0 

89 

IF 

BA 

4820 

82 

Cl 

06 

26 

03 

A 7 

C4 

39 

: 16 

4258 

83 

00 

01 

ED 

C4 

39 

DC 

99 

E3 

4540 

A8 

20 

8E 

96 

80 

84 

0F 

48 

47 

4828 

A7 

A5 

39 

01 

02 

04 

08 

10 

: A4 

4260 

83 

00 

01 

DD 

99 

39 

96 

81 

4A 

4548 

8E 

15 

4F 

AE 

86 

6E 

84 

15 

2D 

4830 

20 

40 

80 

FE 

FD 

FB 

F7 

EF 

: BC 

4268 

81 

06 

27 

22 

E6 

A6 

5C 

E7 

9F 

4550 

6F 

15 

BE 

16 

15 

16 

70 

16 

09 

4838 

DF 

BF 

7F 

0C 

92 

9D 

CB 

Cl 

: E4 

4270 

A6 

96 

8B 

84 

01 

Cl 

80 

26 

B3 

4558 

A6 

17 

81 

14 

BE 

17 

19 

15 

25 

4840 

02 

27 

4C 

9E 

95 

DE 

87 

9F 

: AC 

4278 

02 

8A 

04 

5D 

26 

03 

8A 

40 

E0 

4560 

6F 

15 

DC 

16 

15 

16 

70 

16 

27 

4848 

87 

DF 

95 

8D 

24 

9E 

95 

DE 

: BD 











4568 

A6 

17 

9D 

14 

8E 

17 

19 

96 

C2 

4850 

87 

9F 

87 

DF 

95 

39 

03 

92 

: EF 

SUM: 

4F 

02 

C6 

A2 

60 

B6 

EE 

22 

DF 

4570 

8B 

D6 

81 

58 

8E 

15 

7B 

AE 

06 

4858 

9D 

CB 

Cl 

02 

27 

31 

9E 

97 

: B8 











4578 

85 

6E 

84 

15 

96 

15 

9B 

15 

E7 

4860 

DE 

87 

9F 

87 

DF 

97 

8D 

09 

: 97 

4280 

5D 

2A 

02 

8A 

80 

C4 

0F 

26 

8C 











4868 

9E 

97 

DE 

87 

9F 

87 

DF 

97 

: 36 

4288 

02 

8A 

10 

97 

8B 

39 

9D 

9D 

31 

SUM: 

2B 

3C 

65 

7B 

03 

Cl 

17 

81 : 

A3 

4870 

39 

96 

80 

81 

CB 

26 

18 

9E 

: 77 

4290 

E6 

C4 

5C 

E7 

C4 

20 

DA 

96 

41 











4878 

9B 

EC 

84 

E7 

8 4 

A7 

01 

34 

: 52 

4298 

81 

81 

06 

27 

26 

E6 

A6 

5A 

3B 

4580 

A0 

15 

A5 

15 

AA 

15 

AF 

15 : 

F2 











42A0 

E7 

A6 

96 

8B 

84 

01 

8A 

02 

BF 

4588 

B4 

15 

B9 

9E 

99 

EC 

81 

9F : 

C5 

SUM: 

75 

E5 

2F 

71 

76 

98 

36 

0E 

: 4C 

42A8 

Cl 

7F 

26 

02 

8A 

04 

5D 

26 

79 

4590 

99 

D7 

9B 

97 

9C 

39 

85 

40 : 

3C 











42B0 

03 

8A 

40 

5D 

2A 

02 

8A 

80 

60 

4598 

27 

FI 

39 

85 

40 

26 

EC 

39 : 

61 

4880 

10 

BD 

17 

B0 

35 

10 

EC 

84 

: 49 

42B8 

C4 

0F 

Cl 

0F 

26 

02 

8A 

10 

65 

45A0 

85 

01 

27 

E7 

39 

85 

01 

26 : 

79 

4888 

E7 

84 

A7 

01 

0F 

92 

39 

8E 

: 7B 

42C0 

97 

8B 

39 

9D 

9D 

E6 

C4 

5A 

99 

45A8 

E2 

39 

85 

04 

27 

DD 

39 

85 : 

66 

4890 

11 

0E 

AE 

85 

AD 

84 

0F 

92 

: 24 

42C8 

E7 

C4 

20 

D6 

D6 

81 

Cl 

06 

BF 

45B0 

04 

26 

D8 

39 

85 

80 

27 

D3 : 

3A 

4898 

39 

9D 

CB 

Cl 

04 

10 

27 

00 

: 9D 

42D0 

27 

09 

9E 

9B 

A6 

80 

9F 

9B 

C9 

4 5B8 

39 

85 

80 

26 

CE 

39 

96 

81 : 

82 

48A0 

E9 

96 

82 

48 

8E 

18 

AB 

AE : 

: 48 

42D8 

A7 

A5 

39 

9D 

9D 

9E 

9B 

A6 

9E 

45C0 

81 

06 

27 

0D 

33 

A6 

9E 

99 : 

CB 

48A8 

86 

6E 

84 

11 

5C 

11 

5C 

18 : 

: 6A 

42E0 

80 

9F 

9B 

A7 

C4 

39 

96 

81 

75 

4 5C8 

EC 

81 

9F 

99 

E7 

C4 

A7 

41 : 

38 

48B0 

BB 

19 

52 

19 

41 

15 

8B 

11 : 

: 31 

42E8 

48 

8E 

12 

F0 

AE 

86 

6E 

84 

FE 

45D0 

39 

9E 

99 

EC 

81 

9F 

99 

D7 : 

; EC 

48B8 

5C 

1A 

9B 

D6 

81 

C5 

01 

IF : 

: 4D 

42F0 

13 

00 

13 

22 

13 

36 

13 

4B 

EF 

4 5D8 

8A 

97 

8B 

39 

96 

81 

84 

06 : 

86 

48C0 

A8 

C4 

06 

Cl 

06 

26 

03 

DE : 

: 40 

42F8 

13 

74 

14 

25 

14 

1C 

14 

2E 

32 

4 5E0 

8E 

15 

E7 

AE 

86 

6E 

84 

15 : 

; C5 

48C8 

99 

8E 

EE 

A5 

DF 

80 

IF 

8A 

: C2 














EF 

16 

0B 

16 

10 

10 : 

E6 


o 7 


nfi 

8b 

54 

24 

17 

DC 

: 35 

SUM: 

6F 

55 

35 

B1 

A2 

A2 

11 

8A : 

89 

4 5F0 

8E 

10 

83 

8E 

10 

8C 

C6 

03 : 

: 14 

4 8D8 

Ca 1 

87 

C3 

LID 

00 

01 

34 

01 

DD 

87 

: E4 











45F8 

D7 

89 

EC 

A4 

EE 

84 

El? 

81 : 

D0 

48E0 

35 

02 

5F 

44 

24 

02 

CA 

01 

: CB 

4300 

96 

8A 

8D 

09 

97 

8A 

39 

96 

A6 











48E8 

44 

24 

04 

CA 

04 

21 

5F 

D7 : 

: 91 

4308 

89 

8D 

02 

20 

4F 

48 

25 

07 

FB 

SUM: 

66 

56 

65 

DA 

92 

99 

41 

8C : 

; F3 

48F0 

8B 

DC 

87 

D3 

80 

34 

01 

DD : 

: 53 

4310 

D6 

8B 

C4 

C4 

D7 

8B 

39 

8A 

0E 











48F8 

87 

35 

02 

D6 

8B 

44 

24 

02 : 

89 

4318 

01 

D6 

8B 

C4 

C4 

CA 

01 

D7 

8C 

4600 

EF 

Al 

0A 

89 

26 

F4 

10 

8E : 

: DB 











4320 

8B 

39 

96 

8A 

8D 

09 

97 

8A 

9B 

4608 

10 

83 

39 

DC 

87 

DD 

9B 

39 : 

: E0 

SUM: 

41 

B1 

E0 

E8 

41 

9F 

52 

1C : 

08 

4328 

39 

96 

89 

8D 

02 

20 

2D 

44 

78 

4610 

DC 

87 

DD 

99 

39 

96 

8B 

D6 : 

: 09 











4330 

24 

DE 

8A 

80 

20 

E3 

96 

8A 

2F 

4618 

81 

58 

8E 

16 

21 

AE 

85 

6E : 

: 3F 

4900 

CA 

01 

44 

24 

02 

CA 

04 

44 

47 

4338 

8D 

09 

97 

8A 

39 

96 

89 

8D 

9C 

4620 

84 

16 

3A 

16 

40 

16 

46 

16 : 

: 9C 

4908 

24 

02 

CA 

40 

44 

24 

02 

CA 

64 

4340 

02 

20 

19 

D6 

8B 

54 

49 

25 

5E 

4628 

4C 

16 

52 

16 

58 

16 

5E 

16 : 

; AC 

4910 

80 

D7 

8B 

39 

D6 

8B 

54 

24 

F4 

4348 

D0 

20 

C5 

96 

8A 

8D 

03 

97 

FC 

4630 

64 

9E 

9B 

E6 

84 

A6 

01 

DD : 

; 8B 

4918 

18 

DC 

87 

83 

00 

01 

34 

01 

34 

4350 

8A 

39 

D6 

8B 

54 

46 

20 

EF 

CD 

4638 

9B 

39 

85 

40 

27 

F3 

20 

28 : 

: FB 

4920 

DD 

87 

35 

02 

C6 

02 

44 

24 

CB 

4358 

96 

89 

8D 

F6 

D6 

82 

Cl 

06 

Cl 

4640 

85 

40 

26 

ED 

20 

22 

85 

01 : 

: A0 

4928 

02 

CA 

01 

44 

24 

05 

CA 

04 

08 

4360 

26 

09 

A7 

C4 

D6 

8B 

C4 

01 

C0 

4648 

27 

E7 

20 

1C 

85 

01 

26 

El : 

: D7 

4930 

8E 

C6 

02 

D7 

8B 

DC 

87 

93 

AE 

4368 

4D 

20 

69 

A7 

A5 

D6 

8B 

C4 

47 

4650 

20 

16 

85 

04 

27 

DB 

20 

10 : 

: FI 

4938 

80 

34 

01 

DD 

87 

35 

92 

20 

70 

4370 

01 

4D 

20 

60 

96 

8A 

D6 

8B 

4F 

4658 

85 

04 

26 

D5 

20 

0A 

85 

80 : 

: B3 

4940 

BA 

D6 

8A 

00 

8A 

IF 

A8 

C4 

2F 

4378 

C5 

02 

26 

2E 

D7 

89 

5F 

84 

5E 

4660 

27 

CF 

20 

04 

85 

80 

26 

C9 

: 0E 

4948 

0F 

26 

03 

5F 

20 

AF 

C6 

20 

4C 











4668 

DC 

9B 

C3 

00 

02 

DD 

9B 

39 : 

: ED 

4950 

20 

AB 

D6 

81 

C5 

01 

34 

01 

ID 

SUM: 

96 

A8 

B5 

B8 

90 

E6 

2C 

68 : 

: B5 

4670 

96 

81 

48 

8E 

16 

7A 

AE 

86 

: B1 

4958 

C4 

06 

Cl 

06 

26 

04 

CE 

10 

99 











4678 

6E 

84 

16 

31 

17 

B0 

11 

88 

: 99 

4960 

99 

8E 

33 

A5 

35 

01 

26 

11 

6C 

4380 

0F 

81 

09 

23 

02 

CA 

10 

D7 

6F 











4968 

9E 

9B 

E6 

80 

A6 

80 

9F 

9B 

FF 

4388 

8B 

D6 

89 

C5 

10 

26 

03 

1C 

04 

SUM: 

83 

B6 

8C 

0B 

EA 

69 

50 

BE : 

: 31 

4970 

IF 

01 

EC 

04 

E7 

84 

A7 

01 

E3 

4390 

DF 

8E 

1A 

20 

54 

96 

8A 

19 

34 











4978 

39 

9E 

9B 

E6 

80 

A6 

80 

9F 

9D 

4398 

97 

8A 

D6 

8B 

24 

02 

CA 

01 

73 

4680 

11 

88 

16 

8A 

16 

9D 

11 

5C : 

: 59 











43A0 

84 

0F 

81 

09 

23 

2C 

C4 

EF 

IF 

4688 

11 

5C 

9E 

99 

E6 

84 

A6 

01 : 

: B5 

SUM: 

AF 

76 

ID 

CF 

EF 

10 

81 

4F : 

: E0 

43A8 

20 

28 

0F 

89 

C5 

10 

27 

04 

E0 

4690 

9E 

87 

DD 

87 

IF 

10 

9E 

99 : 

: EF 











43B0 

86 

06 

97 

89 

C5 

01 

27 

06 

9F 

4698 

E7 

84 

A7 

01 

39 

9E 

87 

DC : 

: 4D 

4980 

9B 

IF 

01 

BC 

84 

E7 

C4 

A7 

7D 

43B8 

86 

60 

9A 

89 

97 

89 

C4 

03 

F0 

46A0 

85 

DD 

87 

9F 

85 

39 

96 

81 : 

: 5D 

4988 

4 1 

39 

D6 

8 2 

C5 

02 

27 

01 

Cl 

43C0 

00 

89 

96 

8A 

9B 

89 

34 

01 

02 

46A8 

48 

KK 

16 

B0 

AE 

86 

6E 

84 : 

: C2 

4990 

39 

C5 

01 

27 

14 

D6 

81 

C4 

55 

4 3C8 

97 

8A 

35 

02 

85 

20 

27 

02 

26 

46B0 

it; 

D3 

16 

DB 

16 

E3 

16 

EB : 

: D4 

4998 

03 

5 8 

8E 

19 

Al 

AE 

85 

6E 

44 

43D0 

CA 

10 

96 

8A 

26 

03 

CA 

40 

2D 

46B8 

16 

F3 

16 

FB 

17 

03 

17 

0B : 

: 56 

49A0 

84 

19 

BD 

19 

C7 

1A 

08 

1A 

76 

43D8 

4D 

2A 

02 

CA 

80 

D7 

89 

5F 

82 

46C0 

9E 

9B 

E6 

80 

A6 

80 

1)1) 

9B : 

: 3D 

49A8 

15 

D6 

81 

C4 

03 

58 

8E 

19 

32 

4 3E0 

44 

24 

02 

5C 

4D 

26 

F9 

96 

C8 

46C8 

DE 

99 

IF 

10 

A7 

C2 

E7 

C2 : 

: B8 

49B0 

B5 

AE 

85 

6E 

84 

1A 

22 

1A 

30 

43E8 

89 

C5 

01 

26 

02 

8A 

04 

97 

9C 

46D0 

DF 

99 

39 

96 

8B 

85 

40 

27 : 

: BE 

49B8 

30 

1A 

51 

1A 

72 

9E 

87 

E6 

32 

43F0 

8B 

39 

96 

89 

48 

20 

0F 

96 

F0 

46D8 

E7 

20 

36 

96 

8B 

85 

40 

26 : 

: 49 

49C0 

80 

D7 

89 

9F 

87 

20 

0A 

9E 

CE 

43F8 

89 

47 

20 

0A 

96 

89 

48 

8A 

EB 

46E0 

DF 

20 

2E 

96 

8B 

85 

01 

27 : 

: FB 

49C8 

87 

E6 

84 

D7 

89 

30 

IF 

9F 

3F 











46E8 

D7 

20 

26 

96 

8B 

85 

01 

26 

: EA 

49D0 

87 

96 

8A 

97 

80 

91 

89 

IF 

F7 

SUM: 

4F 

C2 

5F 

2C 

Cl 

2A 

3F 

T2 

00 

: BE 

46F0 

CF 

20 

IE 

96 

8B 

85 

04 

27 

: DE 

49D8 

AH 

D6 

89 

C4 

0F 

D7 

89 

D6 

10 











46F8 

C7 

20 

16 

96 

8B 

85 

04 

26 : 

: CD 

49E0 

80 

C4 

0F 

D1 

89 

D6 

8B 

C4 

D2 

4400 

0 1 

20 

03 

96 

89 

44 

IF 

A9 

: 4F 











40E8 

01 

CA 

02 

24 

02 

CA 

10 

85 

52 

4408 

C4 

0 1 

D7 

89 

D6 

82 

Cl 

06 

: 44 

SUM: 

2E 

8D 

FD 

E4 

43 

D4 

5B 

11 

: IF 

49F0 

08 

27 

02 

CA 

80 

85 

04 

27 

2B 

4410 

26 

03 

A7 

C4 

8E 

A7 

A5 

D6 

: 44 









27 

3A 

49F8 

02 

CA 

4 0 

9E 

83 

30 

IF 

9F 

IB 

4418 

89 

4D 

20 

B8 

96 

8B 

84 

C4 

: 17 

4 700 

BF 



















4420 

8A 

01 

97 

8B 

39 

03 

8A 

96 

: 09 

4708 

B7 

20 

06 

96 

8B 

85 

80 

26 

29 

SUM: 

57 

D4 

ED 

41 

EB 

A4 

29 

4E : 

: 5F 

4428 

8B 

8A 

12 

97 

KB 

39 

96 

8B 

: A3 

4710 

AF 

DC 

9 B 

C3 

00 

02 

DD 

9B 

63 











4430 

85 

01 

26 

07 

84 

C4 

8A 

01 

: 86 

4718 

39 

96 

81 

81 

01 

27 

14 

8E 

9B 

4 A00 

83 

27 

02 

CA 

04 

D7 

8B 

39 

15 

4438 

97 

8B 

39 

84 

C4 

97 

8B 

39 

: FE 

4720 

17 

2B 

E6 

86 

4F 

9E 

9B 

DD 

13 

4A08 

8D 

B3 

D6 

8B 

C5 

40 

26 

04 

D0 

44 40 

96 

8 1 

D6 

82 

81 

06 

27 

10 

: 2D 

4728 

9B 

20 

9D 

00 

08 

10 

18 

20 

A8 

4A10 

C5 

04 

26 

F4 

39 

8D 

B0 

D6 

2F 

4 448 

Cl 

06 

27 

05 

E6 

A5 

E7 

A6 

: 0B 

4730 

28 

30 

38 

35 

10 

9E 

9B 

A6 

B4 

4A18 

8B 

C5 

40 

26 

F7 

C5 

04 

26 

9C 

4450 

39 

9D 

AF 

E6 

C4 

E7 

A 6 

39 

: F5 

4738 

80 

9F 

9B 

DE 

99 

B7 

00 

82 

6A 

4A20 

F4 

39 

9E 

85 

DE 

87 

A6 

C0 

IB 

4458 

Cl 

06 

27 

08 

IF 

98 

9D 

AF 

: F9 

4740 

IF 

10 

A7 

C2 

E7 

C2 

8E 

10 

DF 

4A28 

A7 

80 

9F 

85 

DF 

87 

20 

10 

El 

4460 

A6 

A6 

A7 

C4 

39 

96 

82 

81 

: 89 

4748 

99 

C6 

02 

8D 

27 

8E 

10 

89 

3C 

4A30 

9E 

85 

DE 

87 

A6 

C4 

A7 

84 

ID 

4468 

06 

26 

05 

9D 

9D 

E6 

C4 

8E 

: A3 

4750 

C6 

03 

8D 

20 

D6 

8A 

96 

8B 

F7 

4A38 

30 

IF 

33 

5F 

9F 

85 

DF 

87 

6B 

4 4 70 

E6 

A6 

D7 

89 

96 

81 

48 

8E 

: D9 

4758 

ED 

C3 

8E 

10 

92 

C6 

03 

8D 

36 

4A40 

D6 

8B 

C4 

Cl 

9E 

83 

30 

IF 

56 

4478 

1 4 

7E 

AE 

86 

6E 

84 

14 

96 

: 62 

4760 

13 

D6 

93 

96 

94 

ED 

C3 

ED 

43 

4A48 

9F 

83 

27 

02 

CA 

04 

D7 

8B 

7B 











4768 

C3 

DF 

99 

35 

OH 

IF 

30 

D7 

9E 

4A50 

39 

9E 

83 

DE 

85 

10 

9E 

87 

F2 

SUM: 

9C 

A2 

AD 

2D 

B3 

3A 

31 

75 

: AB 

4770 

80 

97 

81 

39 

D7 

89 

A6 

82 

59 

4A58 

A6 

A 0 

A7 

CO 

30 

IF 

26 

F8 

1A 











4778 

E6 

82 

ED 

C3 

0A 

89 

26 

F6 

C7 

4A60 

9F 

83 

DF 

85 

10 

9F 

87 

10 

CC 

4480 

14 

BE 

14 

C3 

14 

E5 

15 

0E 

: C5 











4A68 

8E 

10 

83 

96 

8B 

84 

Cl 

97 

IE 


134 Oh! MZ 1987 . 8 . 


► v-n * h t Ud-C Ci'i l - 0 

nm m (i7) %%m 
































^THE SENTINEL 


4A70 

8B 

39 

9E 

83 

DE 

85 

10 

9E 

F6 

4AB8 

59 

68 

84 

59 

68 

84 

59 

IF 

02 

mti 

-K 

—>X $ 

d. \y — 




4A78 

87 

31 

21 

33 

41 

A6 

A2 

A7 

3C 

4AC0 

98 

84 

0F 

9A 

89 

97 

8A 

C4 

33 


















4 AC 8 

F0 

54 

54 

54 

54 

EA 

84 

E7 

95 

4030 

C5 

AD CB 

BD 10 

E9 20 

DD : 

; F0 

SUM: 

5C 

49 

C2 

91 

D2 

C4 

76 

29 

2D 

4AD0 

84 

D6 

8B 

C4 

01 

7E 

15 

16 

53 

4038 

BD 

10 FI 

20 D8 

34 0A 

4F : 

: 43 











4AD8 

9E 

87 

96 

8A 

IF 

89 

C4 

F0 

A1 

4040 

IF 

8B 17 

F8 4E 

35 0A 

3B : 

: 81 

4 A80 

C2 

30 

IF 

26 

F8 

31 

3F 

33 : 

: D2 

4AE0 

D7 

89 

44 

66 

84 

46 

66 

84 

BE 








4 A88 

5F 

9F 

83 

DF 

85 

10 

9F 

87 : 

: IB 

4 AE8 

46 

66 

84 

46 

66 

84 

46 

44 

EA 

SUM: 

A1 

48 D3 

D5 36 

52 34 

67 

: B4 

4A90 

10 

8E 

10 

83 

96 

8B 

84 

Cl : 

: 97 

4 AF0 

44 

44 

44 

9A 

89 

97 

8A 

D6 

E6 








4 A98 

97 

8B 

39 

D6 

81 

C5 

04 

27 : 

: A2 

4AF8 

8B 

C4 

01 

7E 

15 

16 



F9 








4 AA0 

F9 

C5 

02 

26 

F5 

C5 

01 

27 : 

: C8 


















4AA8 

2F 

9E 

87 

96 

8A 

IF 

89 

84 ; 

: A0 

sum: 

CF 

76 

12 

DB 

84 

51 

CE 

3F : 

: 14 








4AB0 

F0 

97 

89 

68 

84 

59 

68 

84 : 

: 41 




























VX h 3 


DOS^E 

■ i> 

M 

1 

* 










5100 

ED 

7B 

6C 

IF 

CD 

D6 

IF 

3E 

F3 

5360 

3A 

IK 

29 

B7 

20 

04 

37 

3E : 

: D1 

55A8 

C9 

CD 

91 

25 

C9 

3A 

20 

29 

98 

5108 

23 

CD 

F4 

IF 

ED 

5B 

76 

IF 

E0 

5368 

0C 

C9 

CD 

75 

25 

3A 

5D 

IF : 

F2 

55B0 

CD 

63 

28 

C0 

3A 

7D 

IF 

B7 

A5 

5110 

CD 

D3 

IF 

CD 

IB 

21 

DC 

33 

D7 

5370 

CD 

91 

25 

D8 

CD 

FF 

26 

D8 : 

: 25 

55B8 

20 

02 

3E 

54 

FE 

01 

20 

02 

D5 

5118 

20 

18 

E5 

1A 

FE 

23 

28 

02 

82 

5378 

CD 

E3 

25 

C9 

CD 

75 

25 

3A : 

: 3F 

55C0 

3E 

53 

FE 

03 

20 

02 

3E 

51 

43 

5120 

B7 

C9 

13 

1A 

13 

B7 

C8 

FE 

3D 











55C8 

C9 

F5 

32 

20 

29 

FE 

54 

20 

AB 

5128 

21 

CA 

36 

20 

FE 

4 A 

CA 

72 

C5 

SUM: 

A0 

A5 

75 

73 

7E 

28 

C8 

64 : 

: FF 

55D0 

01 

AF 

FE 

53 

20 

02 

3E 

01 

62 

5130 

21 

FE 

4C 

CA 

El 

21 

FE 

4B 

80 











55D8 

FE 

51 

20 

02 

3E 

03 

32 

7D 

61 

5138 

CA 

38 

22 

FE 

4E 

CA 

71 

22 

CD 

5380 

5D 

IF 

CD 

51 

28 

D8 

20 

09 

C3 

55E0 

IF 

FI 

C9 

2A 

74 

IF 

01 

IE 

B5 

5140 

FE 

4D 

CA 

82 

21 

FE 

57 

CA 

D7 

5388 

CD 

B4 

25 

32 

5D 

IF 

C3 

00 

17 

55E8 

00 

09 

7E 

32 

DE 

27 

ED 

4B 

F6 

5148 

82 

22 

FE 

53 

28 

08 

FE 

44 

67 

5390 

29 

CD 

D0 

IF 

FE 

IB 

CA 

0D 

D5 

55F0 

72 

IF 

2A 

70 

IF 

E5 

3A 

DE 

47 

5150 

28 

12 

3E 

0D 

37 

C9 

1A 

CD 

6C 

5398 

24 

FE 

0D 

20 

06 

3A 

18 

24 

CB 

55F8 

27 

2A 

62 

IF 

5F 

16 

00 

19 

60 

5158 

AA 

22 

13 

FE 

54 

CA 

43 

22 

60 

53A0 

B7 

20 

5F 

3A 

67 

IF 

4F 

06 

4B 











5160 

IB 

C3 

92 

21 

1A 

CD 

AA 

22 

44 

5 3A8 

03 

CB 

3F 

10 

FC 

2A 

60 

IF 

C2 

SUM: 

37 

89 

81 

67 

FA 

AF 

86 

D7 : 

: AE 

5168 

13 

FE 

56 

CA 

5C 

22 

IB 

C3 

8D 

53B0 

16 

00 

5F 

19 

EB 

2A 

64 

IF 

26 











5170 

85 

21 

CD 

94 

22 

CD 

B2 

IF 

C7 

53B8 

3E 

01 

CD 

44 

25 

38 

3D 

79 

63 

5600 

7E 

32 

DE 

27 

EB 

29 

29 

29 

IB 

5178 

3E 

0D 

D8 

EB 

21 

00 

21 

E3 

33 

53C0 

E6 

07 

06 

05 

87 

10 

FD 

2A 

B6 

5608 

29 

EB 

El 

B 7 

28 

19 

FE 

80 

6B 











53C8 

64 

IF 

85 

6F 

30 

01 

24 

7E 

4A 

5610 

30 

19 

3E 

10 

CD 

44 

25 

D8 

A5 

SUM: 

03 

8E 

Cl 

71 

A0 

B6 

E4 

53 

50 

53D0 

B7 

28 

13 

FE 

FF 

28 

36 

ED 

3A 

5618 

11 

00 

10 

19 

E5 

69 

60 

B7 

9F 











53D8 

5B 

74 

IF 

01 

20 

00 

ED 

B0 

AC 

5620 

ED 

52 

4D 

44 

El 

30 

CE 

3E 

ED 

5180 

EB 

E9 

C3 

8E 

IF 

CD 

94 

22 

C7 

53E0 

CD 

EC 

23 

C3 

25 

23 

CD 

EC 

A0 

5628 

07 

37 

C9 

D6 

7F 

FE 

11 

30 

9B 

5188 

CD 

9A 

22 

32 

5D 

IF 

CD 

06 

0A 

53E8 

23 

30 

A6 

C9 

21 

67 

IF 

34 

9D 

5630 

F6 

3D 

0B 

B8 

20 

FI 

06 

00 

0D 

5190 

20 

C9 

CD 

94 

22 

3E 

01 

CD 

78 

53F0 

7E 

2 1 

66 

IF 

BE 

28 

16 

32 

52 

5638 

03 

B7 

28 

07 

F5 

CD 

44 

25 

14 

5198 

A3 

IF 

1A 

FE 

3A 

20 

3E 

13 

85 

53F8 

18 

24 

B7 

C9 

F5 

CD 

0D 

24 

AF 

5640 

38 

14 

FI 

D5 

IE 

00 

57 

19 

A0 

5 1 A0 

CD 

B2 

IF 

38 

38 

22 

70 

IF 

BF 











5648 

E3 

5F 

16 

00 

19 

EB 

2A 

64 

EA 

51A8 

22 

6E 

IF 

13 

CD 

B2 

IF 

38 

98 

SUM: 

67 

AD 

3C 

50 

CB 

AF 

68 

B2 

: 34 

5650 

IF 

3E 

01 

CD 

44 

25 

D1 

D8 

3D 

51B0 

2C 

D5 

ED 

5B 

70 

IF 

B7 

ED 

7C 











5658 

ED 

HO 

AF 

C9 

ED 

5B 

DF 

27 

63 

51B8 

52 

D1 

38 

21 

23 

22 

72 

IF 

52 

5400 

FI 

C9 

21 

67 

IF 

7E 

B7 

28 

BE 

5660 

2A 

El 

27 

ED 

4B 

72 

IF 

C5 

C0 

5 1C0 

13 

CD 

B2 

IF 

38 

03 

22 

6E 

7C 

5408 

01 

35 

AF 

18 

04 

AF 

32 

67 

49 

5668 

0B 

CB 

38 

CB 

38 

CB 

38 

CB 

DF 

51C8 

IF 

CD 

AF 

IF 

D8 

CD 

AC 

IF 

2A 

5410 

IF 

32 

18 

24 

3E 

08 

37 

C9 

D3 

5670 

38 

04 

CD 

21 

27 

B8 

Cl 

3E 

08 

5 1D0 

D8 

CD 

EB 

IF 

11 

F3 

2A 

CD 

AA 

5418 

00 

3 A 

5D 

IF 

CD 

51 

28 

D8 

D4 

5678 

09 

D8 

2A 

74 

IF 

E5 

D5 

C5 

ID 

51D8 

E8 

IF 

C3 

EB 

IF 

3E 

0D 

37 

56 

5420 

CA 

0F 

29 

CD 

91 

25 

D8 

CD 

2A 











51E0 

C9 

3E 

01 

CD 

A3 

IF 

1A 

B7 

68 

5428 

FF 

26 

D8 

3E 

24 

CD 

F4 

IF 

3F 

SUM: 

72 

9C 

63 

98 

6B 

20 

F3 

DA : 

: 61 

51E8 

32 

22 

22 

28 

09 

13 

CD 

B2 

39 

5430 

CD 

21 

27 

CD 

Cl 

IF 

11 

99 

6C 











51F0 

IF 

38 

EA 

22 

20 

22 

CD 

09 

7B 

5438 

28 

CD 

E5 

IF 

06 

10 

ED 

5B 

57 

5680 

11 

18 

00 

19 

5D 

54 

13 

36 

3C 

51F8 

20 

D8 

C4 

23 

22 

20 

F7 

CD 

E5 

5440 

60 

IF 

2A 

64 

IF 

3E 

01 

CD 

38 

5688 

00 

01 

07 

00 

ED 

B0 

Cl 

D 1 

37 











5448 

44 

25 

D8 

CD 

54 

24 

C8 

13 

61 

5690 

El 

3E 

IE 

85 

6F 

30 

01 

24 

86 

SUM: 

14 

27 

0F 

9B 

9E 

D4 

08 

3B : 

: 9A 

5450 

10 

F0 

AF 

C9 

C5 

D5 

06 

08 

20 

5698 

CD 

36 

27 

77 

2A 

70 

IF 

E5 

3F 











5458 

7E 

B7 

28 

0F 

FE 

FF 

28 

12 

A3 

56A0 

2A 

62 

IF 

5F 

16 

00 

19 

EB 

24 

5200 

E2 

IF 

4C 

6F 

61 

64 

69 

6E 

58 

5460 

CD 

E3 

27 

CD 

EE 

IF 

CD 

C7 

45 

56A8 

29 

29 

29 

29 

EB 

0B 

78 

03 

15 

5208 

67 

20 

00 

CD 

9D 

IF 

CD 

EB 

C8 

5468 

1 F 

72 

24 

1 1 

20 

00 

19 

10 

OF 

56B0 

FE 

10 

38 

21 

36 

80 

CD 

36 

20 

5210 

IF 

3A 

22 

22 

B7 

28 

06 

2A 

AC 

5470 

E7 

3E 

AF 

D1 

Cl 

B7 

C9 

3A 

20 

56B8 

27 

77 

El 

F5 

3E 

10 

CD 

5A 

E9 

5218 

20 

22 

22 

70 

IF 

C3 

A6 

IF 

7B 

5478 

5D 

IF 

CD 

9C 

25 

D8 

CD 

91 

40 

56C0 

25 

38 

10 

11 

00 

10 

19 

E5 

8C 

5220 

00 

00 

00 

F5 

CD 

E2 

IF 

46 

09 











56C8 

69 

60 

B7 

ED 

52 

4D 

44 

El 

31 

5228 

6F 

75 

6E 

64 

20 

20 

20 

00 

16 

SUM: 

31 

2A 

F2 

0D 

D4 

8B 

85 

AC 

: EA 

56D0 

FI 

18 

CC 

El 

C9 

3C 

F5 

C6 

76 

5230 

CD 

9D 

IF 

CD 

EB 

IF 

FI 

C9 

1A 











56D8 

7F 

77 

FI 

El 

CD 

5A 

25 

D8 

EC 

5238 

CD 

94 

22 

CD 

A3 

IF 

D8 

CD 

B7 

5480 

25 

D8 

CD 

FF 

26 

D8 

CD 

6B 

FF 

56E0 

CD 

10 

27 

D8 

2A 

74 

IF 

ED 

86 

5240 

15 

20 

C9 

CD 

94 

22 

CD 

A3 

FI 

5488 

27 

D8 

3E 

08 

37 

C0 

7E 

CD 

87 

56E8 

5B 

El 

27 

01 

20 

00 

ED 

B0 

21 

5248 

IF 

13 

CD 

94 

22 

1A 

FE 

50 

ID 

5490 

7C 

25 

D8 

36 

00 

E5 

01 

IE 

B3 

56F0 

2A 

64 

IF 

ED 

5B 

DF 

27 

3E 

39 

5250 

CA 

0C 

20 

FE 

52 

CA 

0F 

20 

3F 

5498 

00 

09 

7E 

El 

CD 

4 E 

27 

D8 

82 

56 F8 

01 

CD 

5A 

25 

D8 

AF 

C9 

D5 

72 

5258 

3E 

0D 

37 

C9 

CD 

94 

22 

1A 

E8 

54A0 

2A 

64 

IF 

3E 

01 

CD 

5 A 

25 

38 











5260 

CD 

AA 

22 

CD 

15 

29 

30 

03 

D7 

54A8 

D4 

10 

27 

C9 

3A 

5D 

IF 

CD 

57 

SUM: 

88 

E8 

F8 

5E 

BD 

34 

92 

A2 : 

EB 

5268 

3E 

03 

C9 

32 

5D 

IF 

C3 

27 

A2 

54B0 

9C 

25 

D8 

CD 

91 

25 

D8 

D5 

C9 











5270 

20 

CD 

94 

22 

CD 

A3 

IF 

1A 

4C 

54B8 

CD 

6B 

27 

ED 

53 

DF 

27 

22 

C7 

5700 

E5 

ED 

5B 

5E 

IF 

2A 

62 

IF 

55 

5278 

13 

FE 

3A 

CA 

12 

20 

3E 

0D 

92 

54C0 

El 

27 

D1 

D8 

3E 

08 

37 

C0 

EE 

5708 

3E 

01 

CD 

44 

25 

El 

D1 

C9 

FO 











54C8 

7E 

CD 

7C 

25 

D8 

3 A 

5D 

IF 

7A 

5710 

D5 

E5 

ED 

5B 

5E 

IF 

2A 

62 

0B 

SUM: 

0B 

05 

E5 

D4 

75 

53 

36 

FC : 

: C3 

54D0 

F5 

CD 

A3 

IF 

FI 

32 

5D 

IF 

23 

5718 

IF 

3E 

01 

CD 

5A 

25 

El 

D1 

5C 











54D8 

CD 

6B 

27 

D8 

3E 

0A 

37 

C8 

7E 

5720 

C9 

C5 

E5 

06 

80 

0E 

00 

2A 

31 

5280 

37 

C9 

3A 

5C 

IF 

FE 

50 

20 

23 

54E0 

ED 

5B 

DF 

27 

2A 

64 

IF 

3E 

39 

5728 

62 

IF 

7E 

B7 

20 

01 

0C 

23 

06 

5288 

05 

3E 

28 

C3 

30 

20 

3E 

50 

0C 

54E8 

01 

CD 

44 

25 

D8 

2A 

74 

IF 

CC 

5730 

10 

F8 

79 

El 

Cl 

C9 

C5 

E5 

96 

5290 

C3 

30 

20 

13 

1A 

FE 

20 

28 

86 

54F0 

23 

ED 

5B 

El 

27 

13 

01 

11 

98 

5738 

06 

80 

2A 

62 

IF 

7E 

B7 

28 

8E 

5298 

FA 

C9 

CD 

94 

22 

13 

1A 

IB 

8E 

54F8 

00 

ED 

B0 

ED 

5B 

DF 

27 

2A 

15 

5740 

06 

23 

10 

F9 

37 

18 

04 

3E 

C3 

52A0 

FB 

3A 

28 

03 

C3 

AD 

25 

1A 

12 











5748 

80 

90 

B7 

El 

Cl 

C9 

D5 

E5 

EC 

52A8 

13 

13 

FE 

61 

D8 

FE 

7B 

D0 

A6 

SUM: 

61 

10 

EB 

ED 

12 

F7 

CE 

75 : 

: 95 

5750 

ED 

5B 

62 

IF 

6F 

26 

00 

19 

77 

52B0 

E6 

DF 

C9 

CD 

75 

25 

3A 

5D 

8C 











5758 

7E 

36 

00 

FE 

80 

38 

F5 

El 

40 

52B8 

IF 

CD 

51 

28 

D8 

CA 

06 

29 

36 

5500 

64 

IF 

3E 

01 

CD 

5A 

25 

C9 

D7 

5760 

D1 

FE 

90 

30 

02 

AF 

C9 

3E 

47 

52C0 

CD 

91 

25 

30 

01 

C9 

CD 

FF 

49 

5508 

3A 

5D 

IF 

CD 

9C 

25 

D8 

CD 

E9 

5768 

07 

37 

C9 

C5 

0E 

10 

ED 

5B 

32 

52C8 

26 

D8 

CD 

6B 

27 

20 

16 

7E 

11 

5510 

91 

25 

D8 

CD 

6B 

27 

D8 

3E 

03 

5770 

60 

IF 

2A 

64 

IF 

3E 

01 

CD 

38 

52D0 

CD 

7C 

25 

D8 

CD 

84 

25 

D8 

94 

5518 

08 

37 

C0 

CB 

F6 

2A 

64 

IF 

6D 

5778 

44 

25 

38 

24 

06 

08 

7E 

FE 

4 F 

52D8 

B5 

01 

IF. 

00 

09 

7E 

El 

CD 

39 

5520 

3E 

0 1 

CD 

5A 

25 

C9 

3A 

5D 

EB 











52E0 

4E 

27 

D8 

18 

06 

CD 

A2 

27 

01 

5528 

IF 

CD 

9C 

25 

D8 

CD 

91 

25 

08 

SUM: 

C5 

2A 

00 

3E 

98 

E9 

C9 

F6 : 

6D 

52E8 

3E 

09 

D8 

BD 

53 

DF 

27 

22 

87 

5530 

D8 

CD 

6B 

27 

D8 

3E 

08 

37 

8C 











52F0 

El 

27 

CD 

3F 

29 

CD 

70 

25 

9F 

5538 

CO 

CB 

B6 

2A 

64 

IF 

3E 

01 

2D 

5780 

FF 

28 

1A 

B7 

28 

0B 

D5 

ED 

ED 

52F8 

AF 

C9 

CD 

76 

25 

3A 

8D 

IF 

95 

5540 

CD 

5 A 

25 

C9 

08 

3A 

5D 

IF 

D3 

5788 

5B 

74 

IF 

CD 

CD 

27 

D1 

28 

A8 











5548 

CD 

9C 

25 

D8 

CD 

91 

2 5 

D8 

Cl 

5790 

0D 

D5 

1 1 

20 

00 

19 

D1 

10 

0D 

SUM: 

D0 

FF 

0B 

4B 

18 

67 

27 

D2 

: A0 

5550 

D6 

41 

32 

06 

2B 

08 

CD 

00 

4F 

5798 

E5 

13 

0D 

20 

D5 

3E 

AF 

B7 

9E 











5558 

2B 

C9 

08 

3A 

5D 

IF 

CD 

9C 

IB 

57A0 

Cl 

C9 

C5 

0E 

1 0 

ED 

5B 

60 

15 

5300 

CD 

51 

28 

D8 

CA 

03 

29 

CD 

El 

5560 

25 

D8 

CD 

91 

25 

D8 

D6 

41 

6F 

57A8 

IF 

2A 

64 

IF 

3E 

01 

CD 

44 

1C 

5308 

91 

25 

30 

01 

C9 

CD 

6B 

27 

0F 

5568 

32 

06 

2B 

08 

CD 

03 

2B 

C9 

2F 

57B0 

25 

38 

16 

06 

08 

7 B 

B7 

28 

DE 

5310 

D8 

3E 

08 

37 

C0 

E5 

ED 

5B 

42 

5570 

F5 

3E 

01 

18 

02 

F5 

AF 

32 

24 

57B8 

11 

FE 

FF 

28 

0D 

D5 

11 

20 

49 

5318 

74 

IF 

01 

20 

00 

BD 

B0 

El 

32 

5578 

IE 

29 

FI 

C9 

B7 

CB 

77 

C8 

C2 

57C0 

00 

19 

D1 

10 

F0 

13 

0D 

20 

2A 

5320 

7E 

CD 

84 

25 

D8 

CD 

2A 

29 

EC 











57C8 

E0 

3E 

AF 

Cl 

C9 

C5 

D5 

E5 

D6 

5328 

CD 

70 

25 

AF 

C9 

3A 

5D 

IF 

90 

SUM: 

31 

83 

ED 

91 

0B 

50 

8D 

44 : 

: 5E 

57D0 

06 

10 

13 

23 

1A 

BE 

20 

02 

46 

5330 

CD 

51 

28 

D8 

CA 

09 

29 

3A 

54 











57D8 

10 

F8 

El 

D1 

Cl 

C9 

00 

00 

44 

5338 

IE 

29 

B 7 

20 

04 

37 

3B 

0C 

A3 

5580 

3E 

04 

37 

C9 

E5 

E6 

87 

21 : 

: B5 

57E0 

00 

00 

00 

C5 

D5 

E5 

ED 

5B 

C7 

5340 

C9 

CD 

75 

25 

3A 

5D 

IF 

CD 

B3 

5588 

IF 

29 

BE 

El 

C8 

3E 

06 

37 : 

: 2A 

57E8 

74 

IF 

01 

20 

00 

BD 

B0 

CD 

IE 

5348 

91 

25 

DB 

CD 

5C 

26 

C9 

3A 

B0 

5590 

C9 

FE 

41 

38 

04 

FE 

45 

3F : 

: C6 

57F0 

27 

28 

3A 

5D 

IF 

CD 

F4 

IF 

E5 

5350 

5D 

IF 

CD 

5 1 

28 

D8 

CA 

0C 

70 

5598 

D0 

3E 

0B 

C9 

CD 

51 

28 

D8 : 

: 00 

57F8 

3E 

3A 

CD 

F4 

IF 

CD 

9D 

IF 

El 

5358 

29 

AF 

32 

67 

IF 

32 

18 

24 

FE 

55A0 

CD 

63 

28 

20 

04 

3E 

03 

37 : 

: F4 
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SUM: 

31 

8D 

11 

1A 

D4 

95 

46 

35 

CD 

5910 

F3 

ID 

C3 

E3 

27 

C3 

51 

28 

19 

5A30 

69 

63 

65 

20 

4F 

66 

66 

6C 

: D8 











5918 

C3 

63 

28 

00 

00 

00 

00 

00 

4E 

5A38 

69 

6E 

65 

0D 

42 

61 

64 

20 

: 70 

5800 

CD 

2A 

29 

ED 

4B 

72 

IF 

2A 

13 

5920 

41 

00 

00 

00 

00 

00 

00 

00 

41 

5A40 

46 

69 

6C 

6 5 

20 

44 

65 

73 

: BC 

5808 

70 

IF 

ED 

5B 

6E 

IF 

CD 

IE 

4F 

5928 

00 

00 

E5 

2A 

12 

07 

22 

72 

BC 

5A48 

63 

72 

69 

70 

74 

65 

72 

0D 

: 06 

5810 

28 

09 

2B 

CD 

IE 

28 

EB 

CD 

27 

5930 

IF 

2A 

14 

07 

22 

70 

1 F 

2A 

3F 

5A50 

57 

72 

69 

74 

65 

20 

50 

72 

: ED 

5818 

IE 

28 

El 

D1 

Cl 

C9 

3E 

3A 

FA 

5938 

16 

07 

22 

6E 

IF 

El 

C9 

E5 

5B 

5A58 

6F 

74 

65 

63 

74 

65 

64 

0D 

: F5 

5820 

CD 

F4 

IF 

CD 

BE 

IF 

C9 

F5 

48 

5940 

2A 

72 

IF 

22 

12 

07 

2A 

70 

90 

5A60 

42 

61 

64 

20 

52 

65 

63 

6F 

: B0 

5828 

11 

A9 

28 

CB 

7F 

28 

03 

3E 

95 

5948 

IF 

22 

14 

07 

2A 

6E 

IF 

22 

35 

5A68 

72 

64 

0D 

42 

61 

64 

20 

46 

: 50 

5830 

08 

1 1 

E6 

07 

6F 

26 

00 

29 

C4 

5950 

16 

07 

El 

C9 

00 

00 

00 

00 

C7 

5A70 

69 

6C 

65 

20 

4D 

6F 

64 

65 

: DF 

5838 

29 

11 

A9 

28 

19 

EB 

CD 

E5 

Cl 

5958 

00 

00 

00 

00 

00 

00 

00 

00 

00 

5A78 

0D 

42 

61 

64 

20 

41 

6C 

6C 

: 4D 

5840 

IF 

FI 

CB 

77 

3E 

2A 

20 

02 

DC 

5960 

00 

00 

00 

00 

00 

00 

00 

00 

00 











5848 

3E 

20 

CD 

F4 

IF 

CD 

FI 

IF 

IB 

5968 

00 

00 

00 

00 

00 

00 

00 

00 

00 

SUM: 

35 

84 

5E 

22 

10 

E4 

4F 

B3 

: 2F 

5850 

C9 

CD 

63 

28 

C8 

FE 

41 

38 

60 

5970 

00 

00 

00 

00 

00 

00 

00 

00 

00 











5858 

07 

FE 

4D 

3F 

38 

02 

B7 

C9 

4B 

5978 

00 

00 

00 

00 

00 

00 

00 

00 

00 

5A80 

6F 

63 

61 

74 

69 

6F 

6E 

20 

: 0D 

5860 

3E 

03 

C9 

FE 

54 

C8 

FE 

53 

75 











5A88 

54 

61 

62 

6C 

65 

0D 

46 

69 

: A4 

5868 

C8 

FE 

51 

C9 

3D 

FE 

0E 

38 

61 

SUM: 

6B 

F3 

24 

54 

60 

9D 

84 

E8 : 

: 3F 

5A90 

6C 

65 

20 

6E 

6F 

74 

20 

46 . 

: A8 

5870 

13 

3C 

11 

E3 

2A 

F5 

CD 

E8 

17 











5A98 

6F 

75 

6E 

64 

0D 

44 

65 

76 : 

E2 

5878 

IF 

3E 

24 

CD 

F4 

IF 

FI 

CD 

IF 

5980 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

5AA0 

69 

63 

65 

20 

46 

75 

6C 

6C : 

E4 











5988 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

5AA8 

01) 

46 

69 

6C 

65 

20 

41 

6C : 

5A 

SUM: 

F7 

90 

8F 

F6 

69 

AB 

81 

F2 : 

: 93 

5990 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

5AB0 

72 

65 

61 

64 

79 

20 

45 

78 : 

F2 











5998 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

5AB8 

69 

73 

74 

73 

0D 

52 

65 

73 : 

FA 

5880 

Cl 

IF 

18 

0E 

21 

00 

2A 

87 

D8 

59A0 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

5AC0 

65 

72 

76 

65 

64 

20 

46 

65 : 

El 

5888 

5F 

16 

00 

19 

5E 

23 

56 

CD 

32 

59A8 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

5 AC 8 

61 

74 

75 

72 

65 

0D 

46 

69 : 

DD 

5890 

E8 

IF 

CD 

C4 

IF 

CD 

EB 

IF 

8E 

59B0 

00 

00 

00 

00 

00 

00 

00 

00 ; 

: 00 

5AD0 

6C 

65 

20 

6E 

6F 

74 

20 

4F : 

: B1 

5898 

C9 

20 

43 

6C 

75 

73 

74 

65 

59 

59B8 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

5AD8 

70 

65 

6E 

0D 

53 

79 

6E 

74 : 

: FE 

58A0 

72 

73 

20 

46 

72 

65 

65 

0D 

94 

59C0 

00 

0 0 

00 

00 

00 

00 

00 

00 : 

: 00 

5AE0 

61 

78 

20 

45 

72 

72 

6F 

72 : 

: 03 

58A8 

00 

4E 

75 

6C 

00 

42 

69 

6E 

48 

59C8 

00 

00 

00 

00 

00 

00 

00 

00 ; 

: 00 

5AE8 

20 

0D 

42 

61 

64 

20 

44 

61 : 

: F9 

58B0 

00 

42 

61 

73 

00 

3F 

3F 

3F 

D3 

59D0 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

5AF0 

74 

61 

0D 

43 

6F 

6D 

70 

6C : 

: DD 

58B8 

00 

41 

73 

63 

00 

3F 

3F 

3F 

D4 

59D8 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

5AF8 

65 

74 

65 

20 

21 

0D 

00 

00 : 

: 8C 

58C0 

00 

3F 

3F 

3F 

00 

3F 

3F 

3F 

7A 

59E0 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 











58C8 

00 

44 

69 

72 

00 

0 0 

00 

00 

IF 

59E8 

00 

00 

00 

00 

00 

00 

oo 

00 : 

: 00 

SUM: 

EB 

29 

41 

70 

6C 

61 

CD 

D8 : 

: 37 

58D0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

59F0 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 











58D8 

00 

00 

00 

00 

00 

0 0 

0 0 

00 

00 

59F8 

00 

00 

00 

00 

00 

00 

00 

00 ; 

: 00 

5B00 

C3 

07 

2B 

C3 

10 

2B 

00 

C5 : 

: B8 

58E0 

00 

00 

00 

00 

00 

00 

00 

00 

00 











5 BO 3 

ED 

4B 

06 

2B 

CF 

1A 

Cl 

C9 : 

DC 

58E8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

SUM: 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

5B10 

C5 

ED 

4B 

06 

2B 

CF 

IB 

Cl : 

D9 

58F0 

00 

00 

00 

00 

00 

00 

00 

00 

00 











5B18 

C9 








C9 

58F8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

5A00 

1C 

2A 

2D 

2A 

3C 

2A 

50 

2A : 

: 7D 





















5A08 

60 

2A 

6B 

2A 

79 

2A 

8E 

2A : 

: 7 A 

SUM: 

3E 

3F 

7C 

F4 

0A 

14 

DC 

4 F : 

36 

SUM: 

43 

3B 

39 

90 

85 

C7 

6A 

10 : 

: 0D 

5A10 

9D 

2A 

A9 

2A 

BD 

2A 

CE 

2A : 

: 79 





















5A18 

DC 

2A 

EA 

2A 

44 

65 

76 

69 : 

; A2 











5900 

C3 

E4 

ID 

C3 

E7 

ID 

C3 

EA 

: 38 

5A20 

63 

65 

20 

49 

2F 

4F 

20 

45 : 

: 14 











5908 

ID 

C3 

ED 

ID 

C3 

F0 

ID 

C3 : 

: 7D 

5A28 

72 

72 

6F 

72 

0D 

44 

65 

76 : 

: FI 
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6000 

1 1 

30 

32 

CD 

E5 

IF 

ED 

5B 

8C 

60E8 

31 

ED 

B1 

20 

ED 

FE 

30 

30 : 

: 3A 

61B8 

01 

08 

00 

21 

C2 

31 

ED 

B1 : 

: BB 

6008 

76 

IF 

CD 

D3 

IF 

1A 

FE 

IB 

87 

60F0 

34 

FE 

1C 

38 

26 

20 

05 

CD : 

; 9E 

61C0 

El 

C9 

06 

09 

0C 

0F 

12 

15 : 

; FB 

6010 

C8 

CD 

B2 

IF 

38 

EA 

22 

7B 

25 

60F8 

71 

31 

18 

DE 

FE 

ID 

20 

05 : 

: D8 

61C8 

18 

IB 

0D 

IB 

1C 

ID 

IE 

IF : 

D1 

6018 

32 

1 1 

43 

32 

CD 

E5 

IF 

CD 

56 











61D0 

30 

31 

32 

33 

34 

35 

36 

37 : 

9C 

6020 

27 

30 

CD 

D4 

30 

18 

1)9 

21 

3A 

SUM: 

B2 

0E 

09 

2C 

65 

81 

28 

79 296D 

61D8 

38 

39 

41 

42 

43 

44 

45 

46 : 

06 

6028 

00 

04 

CD 

IE 

20 

2A 

7B 

32 

E6 











61E0 

54 

47 

52 

CD 

IF 

32 

47 

CD : 

IF 

6030 

0E 

10 

CD 

3D 

30 

CD 

EE 

IF 

32 

6100 

CD 

94 

31 

18 

D5 

FE 

IE 

20 

BB 

61E8 

27 

32 

4F 

C5 

3A 

7D 

32 

D6 : 

2C 

6038 

0D 

20 

F7 

18 

24 

E5 

CD 

BE 

D0 

6108 

09 

06 

10 

CD 

94 

31 

10 

FB 

BC 

61F0 

05 

01 

03 

00 

9 I 

38 

03 

04 : 

D9 

6040 

IF 

El 

06 

08 

IE 

00 

CD 

FI 

EA 

6110 

18 

C8 

06 

1 o 

CD 

71 

31 

10 

75 

61F8 

18 

FA 

78 

Cl 

81 

5F 

16 

00 : 

4 1 

6048 

IF 

7E 

23 

57 

CD 

Cl 

IF 

7 A 

3E 

6118 

FB 

18 

BF 

21 

7D 

32 

FE 

0D 

AD 











6050 

83 

5F 

10 

F2 

CD 

FI 

IF 

3E 

FF 

6120 

C0 

36 

05 

18 

B5 

FE 

54 

20 

3A 

SUM: 

43 

43 

63 

08 

6D 

24 

A2 

CB E6FC 

6058 

3A 

CD 

F4 

IF 

7B 

CD 

Cl 

IF 

42 

6128 

0E 

2A 

7B 

32 

11 

80 

00 

B7 

2D 











6060 

C9 

21 

00 

14 

CD 

IE 

20 

06 

0F 

6130 

ED 

52 

22 

7B 

32 

18 

0E 

FE 

32 

6200 

2A 

7B 

32 

19 

3A 

7D 

32 

C5 

9E 

6068 

20 

3E 

21) 

CD 

F4 

IF 

10 

FB 

76 

6138 

47 

20 

0F 

2A 

7B 

32 

11 

80 

DE 

6208 

CD 

B7 

31 

Cl 

7E 

20 

05 

E6 

FF 

6070 

CD 

EE 

IF 

1 1 

75 

32 

CD 

E5 

44 

6140 

00 

19 

22 

7B 

32 

CD 

27 

30 

0C 

6210 

F0 

B0 

18 

09 

E6 

0F 

4F 

78 

7D 

6078 

IF 

2A 

7B 

32 

0E 

08 

06 

10 

22 

6148 

18 

8A 

FE 

52 

20 

05 

CD 

61 

45 

6218 

87 

87 

87 

87 

B1 

77 

C9 

D6 

E3 











6150 

30 

18 

81 

CD 

E3 

31 

2A 

7D 

51 

6220 

30 

FE 

0A 

D8 

D6 

07 

C9 

3A 

F0 

SUM: 

93 

93 

46 

CC 

24 

F2 

OA 

AC E483 

6158 

32 

2E 

00 

CD 

IE 

20 

CD 

27 

5F 

6228 

7E 

32 

D6 

04 

87 

87 

87 

C9 

E8 











6160 

32 

5F 

16 

00 

2A 

7B 

32 

19 

97 

6230 

0C 

49 

4E 

50 

55 

54 

20 

53 

0F 

6080 

11 

08 

00 

AF 

86 

19 

10 

FC : 

: 73 

6168 

CD 

3D 

30 

CD 

71 

31 

C3 

DA 

46 

6238 

54 

41 

52 

54 

20 

41 

44 

52 

32 

6088 

CD 

Cl 

IF 

CD 

FI 

IF 

11 

7F : 

: 1A 

6170 

30 

C5 

21 

7D 

32 

3E 

IB 

BE 

DC 

6240 

53 

0D 

00 

0C 

44 

55 

4D 

50 

A2 

6090 

00 

B7 

ED 

52 

0D 

20 

E7 

3E : 

: 48 

6178 

20 

05 

CD 

89 

31 

18 

08 

7E 

4A 

6248 

20 

26 

20 

45 

44 

49 

54 

0D 

99 

6098 

3A 

C9 

CD 

F4 

IF 

2A 

7B 

32 

: BA 











6250 

0D 

41 

44 

52 

53 

20 

2B 

30 

B2 

60A0 

06 

80 

56 

5A 

23 

05 

28 

27 

: AD 

SUM: 

B4 

9B 

8C 

3F 

77 

BF 

D3 

FI 60DD 

6258 

20 

2B 

31 

20 

2B 

32 

20 

2B 

44 

60A8 

5E 

23 

05 

28 

22 

D5 

IE 

80 

: 43 











6260 

33 

20 

2B 

34 

20 

2B 

35 

20 

52 

60B0 

D9 

El 

D9 

7E 

A3 

28 

01 

37 

: 14 

6180 

34 

CD 

B7 

31 

20 

01 

34 

Cl : 

: FF 

6268 

2B 

36 

20 

2B 

37 

20 

3A 

53 

90 

60B8 

D9 

ED 

6A 

30 

08 

3E 

10 

AC : 

: 62 

6188 

C9 

36 

05 

23 

7E 

34 

FE 

13 : 

: EA 

6270 

55 

4D 

0D 

0D 

00 

53 

55 

4D 

B1 

60C0 

67 

3E 

21 

AD 

6F 

D9 

CB 

0B 

: 91 

6190 

C0 

36 

04 

C9 

C5 

21 

7D 

32 : 

: 58 

6278 

3A 

20 

00 

00 

90 

00 

00 


EA 

60C8 

30 

E9 

23 

10 

E6 

D9 

EB 

EB 

: El 

6198 

3E 

05 

BE 

20 

05 

CD 

AC 

31 : 

: D0 











60D0 

CD 

BE 

IF 

C9 

21 

05 

04 

22 

: BF 

61A0 

18 

08 

7E 

35 

CD 

B7 

31 

28 : 

: B0 

SUM: 

09 

85 

6F 

19 

0E 

D4 

B3 

19 EFDD 

60D8 

7D 

32 

2A 

7D 

32 

CD 

IE 

20 

: 93 

61A8 

01 

35 

Cl 

C9 

36 

IB 

23 

7E : 

: B2 











60E0 

CD 

21 

20 

01 

19 

00 

21 

CA 

: 13 

61B0 

35 

FE 

04 

C0 

36 

13 

C9 

E5 : 

: EE 
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U x 1 

6 

SYSGENo 


2100 

16 

00 

92 

0A 

00 

08 

00 

01 

BB 

2180 

CE 

FC 

82 

CC 

03 

00 

A 7 
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100 CLEAR , &.H1FFF : DEFINT A-Z : ON ERROR GOTO 440 


110 LOADM "SYSGENo” ’ System genelate program 

120 LOADM "SOSo" » SW0RD-FM7 system module 

130 COLOR 5 : PRINT "- SWORD-FM7 system disk genelate program 


140 COLOR 7 : INPUT "Do you want Memory Editor in System Disk (Y/N) ?",IN$ 
150 IN=INSTR("YyNn",IN$) : IF IN=0 GOTO 140 

160 IF IN<3 GOTO 220 

170 ’-no Memory Editor 

180 POKE &H21BC,40 ’ IPL 
190 POKE &H2021,40 ’ SYSGENo 
200 GOTO 240 

210 *-with Memory Editor 

220 POKE &H21BC,43 ’ IPL 

230 POKE &H2021,43 ’ SYSGENo 

240 PRINT:INPUT "Drive Number=",DRV$ 

250 DRV=VAL(DRV$):IF DRV=0 AND DRV$<>"0" GOTO 240 
260 IF DRV>3 GOTO 240 
270 POKE &.H2009 , DRV 

280 PRINT : PRINT "Mount phigical formatted disk on drive #";DRV 
290 INPUT "Sure (Y/N) ? ",INS 
300 IN=INSTR("YyNn",INS) 

310 IF IN=0 GOTO 290 ELSE IF IN>2 THEN END 
320 PRINT "Working." 

330 EXEC &H2000 

340 IF PEEK(&H2003)<>0 THEN ERROR 53 
350 PRINT "Completed !" 

360 INPUT "Genelate another system disk (Y/N) ? ",INS 
370 IN=INSTR("YyNn",INS) 

380 IF IN=0 GOTO 360 ELSE IF IN<3 GOTO 130 
390 CLEAR ,&.H71D5 
400 END 
410 ’ 

420 ' Error trap routine 
430 ’ 

440 IF ERR053 THEN ON ERROR GOTO 0 

450 COLOR 2 

460 ERC=PEEK(&H2003) 

470 IF ERC=10 THEN PRINT "Drive not ready." : GOTO 500 
480 IF ERC=11 THEN PRINT "Disk write protected." : GOTO 500 
490 PRINT "Device I/O error." 

500 COLOR 7 : RESUME 360 


y * h 9 

100 CLEAR 300,&H2IFF 
110 P=4H2200 
Via ’KEAD AS 

130 IF AS<>"*" THEN POKE P,VAL("&H"+AS):P=P+1:GOTO 120 
140 FOR P=«tH2208 TO &H224F 
150 POKE P,0 
160 NEXT 


FAT, f UflFJ* 

170 FOR P=4H2250 TO 4H22FF 
180 POKE P.4H8F 

190 NEXT 

200 FOR P=4H2300 TO 4H33FF 
210 POKE P.4HFF 

220 NEXT 

230 DATA 01,8F,03,04,8F,00,00,00,* 
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U * MO 

1000 ' 

1010 * Check sum dump program 
1020 ’ 

1030 DEFINT A-Z : DIM VSUM(7) 

1040 PRINT CHRSUHl 1 )+CHR$(5) + " h H f- h h r f- Check sum dump program rhhH-H-" 

1050 INPUT "Start addr. =$",IN$ 

1060 SA=VAL("&H"+IN$) 

1070 INPUT "End addr. =S",IN$ 

1080 EA=VAL("&H"+IN$) 

1090 INPUT "Dump to line printer (Y/N) ? ",IN$ 

1100 IF IN$="Y” OR IN$="y" THEN OPEN "O",*1,"LPT0:" ELSE OPEN "O",#1,"SCRN: 

1110 FOR A=SA TO EA STEP 128 

1120 FOR X=0 TO 7 

1130 VSUM(X)=0 

1140 NEXT 

1150 FOR Y=0 TO 15 

1160 HSUM=0 

1170 PRINT # l , RIGHTS("000" + HEX$(A+Y*8),4)+" "; 

1180 FOR X=0 TO 7 

1190 D=PEEK(A+Y*8+X) : HSUM=HSUM+D : VSUM(X)=VSUM(X)+D 

1200 PRINT #1,RIGHTS{"0"+HEX$(D),2)+" 

1210 NEXT 

1220 PRINT #1,":"+RIGHT$("0"+HEXS(HSUM MOD 256),2) 

1230 NEXT 

1240 PRINT #1 , "---" 

1250 PRINT #1 , "Sum: "; 

1260 TSUM=0 
1270 FOR X=0 TO 7 

1280 PRINT #1,RIGHT$("0"+HEX$(VSUM(X)MOD 256),2) + " : TSUM = TSUM+(VSUM(X) M 

OD 256) 

1290 NEXT 

1300 PRINT #1,":"+RIGHT$("0"+HEX$(TSUM MOD 256),2) 

1310 PRINT #1,"" 

1320 NEXT 
1330 CLOSE #1 
1-340 END 
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O08B MTLPWK EQU $0081) 


I/O $FD00 write work 


FC80 SHARED EQU SFC80 


FD00 

FD01 

FD02 

FD02 

FD03 

FD04 

FD05 

FD05 

FD37 

FD38 


4000 

8000 

C7D0 

D380 

D409 

D40D 

D40E 


0000 

0003 

0005 

0007 

0008 


MTLPOT 

LPDTOT 

MTLPIN 

IRQCTL 

BUZZER 

STOPF 

SBSIN 

SBSOUT 

MLTPAG 

COLPLT 


SFD00 

5FD01 

SFD02 

$FD02 

SFD03 

$FD04 

$FD05 

$FD05 

SFD37 

SFD38 


Common memory 

Magnetic tape,printer control 
Line printer data out 
Magnetic tape,printer status 
Interupped request control 
Buzzer control 
•BREAK 1 key status 
Sub-system status 
Sub-system control 
Multi page control 
Color palette control 


* Hardware interface (Sub) 

_VB EQU $0000 VRAM (Blue) 

_VR EQU $4000 VRAM (Red) 

__VG EQU $8000 VRAM (Green) 

_ATB EQU SC7D0 Attr. buffer top addr. 

_COMAR EQU SD380 Common memory 


VACC EQU SD409 
INSLED EQU $D40D 
SOFFST EQU $D40E 


VRAM access control 
INS-LED control 
VRAM offset control 


00OB HOME 
000C EA 
000D CR 
0011 SF 
0012 
0013 
001B 
11)00 
001C 
0010 
001E 
001F 
0020 
007F 
00F1 


EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 


SBA 

RC 

ESC 

ESC00 

CSRR 

CSRL 

CSRU 

CSRD 

SPC 

DEL 

PA I 


$00 End of string 

$03 Key-bord abort 

$05 Erase line 

$07 Bell 

$08 Back space 

$09 Horizontal TAB 

$0A Lino feed 

$0B Cursor home 

$0C Erase all 

EQU $0D Carriage return 

EQU $11 Set field 

EQU $12 Set buffer addr. 

EQU $13 Repeat char. 

EQU $1B Escape 

EQU $1B00 ESC*$100 

EQU $1C Cursor right 

EQU $1D Cursor left 

EQU $1E Cursor up 

EQU $1F Cursor down 

EQU $20 Space 

EQU $7F Delete 

EQU $F1 

Work area (Main) 


0000 ZRST00 EQU $0000 Z-80 RST 00H GAP 

0008 ZRST08 EQU $0008 Z-80 RST 08H GAP 

0010 ZRST10 EQU $0010 Z-80 RST 10H GAP 

0018 ZRST18 EQU $0018 Z-80 RST 18H GAP 

0020 ZRST20 EQU $0020 Z-80 RST 20H GAP 

0028 ZRST28 EQU $0028 Z-80 RST 28H GAP 

0030 ZRST30 EQU $0030 Z-80 RST 30H GAP 

0038 ZRST38 EQU $0038 Z-80 RST 38H GAP 

0066 ZNHI66 EQU $0066 Z-80 NMI GAP 

0080 ZSTKPT EQU $0080 Z-80 System stack pointer save 

0082 FUNCNO EQU $0082 System call function nunber 

0083 CNTCHR EQU $0083 Char, counter 

0084 CSRX EQU $0084 Cursor X pos. 

0085 CSRY EQU $0085 Cursor Y pos. 

0086 ILIHIT EQU $0086 Buffer limit (Input 1 line) 

0087 BRKFLG EQU $0087 Break key flag 

0088 CRATTR EQU $0088 Current attr. 

0089 CRCNSM EQU $0089 Current console mode 

008A LPRTRY EQU $00BA Line printer retry count (Sec) 


84 

008C 

IRQWRK 

EQU 

$008C I/O $FD02 write work 

85 

008D 

BELWRK 

EQU 

$008D I/O $FD03 write work 

86 

008E 

SBSWRK 

EQU 

S008E I/O $FD05 write work 

87 

008F 

MPWRK 

EQU 

$008F Multi page control work 

89 

0400 

Z80STK 

EQU 

$0400 Z-80 system stack bottom 

90 

0600 

STKBTM 

EQU 

$0600 6809 system stack bottom 

92 

0600 

SINBUF 

EQU 

$0600 Systea input buffer 

93 

0700 

INFBLK 

EQU 

$0700 Information block 

94 

0701 

INFBK1 

EQU 

INFBLK+1 

95 

0701 

NAME## 

EQU 

$0701 File name 

96 

0712 

SIZE#@ 

EQU 

$0712 File size 

97 

0714 

DTADRg 

EQU 

$0714 Data addr. 

98 

0716 

EXADR# 

EQU 

$0716 Exec addr. 

99 





100 



Work 

area (Sub) 

101 





102 

D01F 

VOFST 

EQU 

$D01F VRAM offset work 

103 

D022 

PUTCFG 

EQU 

$D022 Continuance PUT flag 

104 

D054 

GTTOPA 

EQU 

$D054 Current window attr. top addr. 

105 

D056 

GTBTMA 

EQU 

$D056 Current window attr. bottom addr 

106 

D05C 

_CAAD 

EQU 

$D05C Cursor attr. buffer addr. 

107 


• 



108 


• 

System sub-routine (Main) 

109 





110 

FE05 

DWRITE 

EQU 

$FE05 5" disk 1 sector write routine 

111 

FE08 

DREAD 

EQU 

$FE08 5" disk 1 sector road rotuine 

112 


• 



113 


• 

Systea sub-routine (Sub) 

114 


■ 



115 

E3C3 

CBADR 

EQU 

SE3C3 Calculate buffer address 

116 

E787 

CTOB 

EQU 

$E787 Set buffer pointer from cursor 

117 

EA7F 

GETENA 

EQU 

$EA7F Set cursor 

119 


. 



120 


* +++ 

SWORD 

i 6809 systea module ++♦ 

121 


* 

Coded by S.Kigoshi 

122 





123 0800 



ORG 

$0800 

124 

00 


SETDF 

1 $00 

125 


• 



126 


» 

System initialize routine entry 

127 





128 0800 

20 27 

ENTRY 

BRA 

SYSINT 

129 


• 



130 


• 

Systea module ID code 

131 


• 



132 0802 

53 


FCC 

•SOSSYSV1 1 

133 080A 

00 


FCB 

EOS 

134 


• 



135 


■ 

6809 

interupped vector data 

136 


* 



137 080B 

0880 

IRQVCT 

FDB 

HKSWI3 SWI3 vector 

138 080D 

0883 


FDB 

HKSWI2 SWI2 vector 

139 080F 

0886 


FDB 

HKF1RQ FIRQ vector 

140 0811 

0889 


FDB 

HK1RQ IRQ vector 

141 0813 

088C 


FDB 

HKSWI SWI vector 

142 0815 

088F 


FDB 

HKNMI NMI vector 

143 





144 



Z-80 

interupped vector data 

145 





146 0817 

00 

ZIVTBL 

FCB 

<ZHK00H,>ZHK00H 1 For RST 00H 

147 0819 

03 


FCB 

<ZHK0BH,>ZHK08H 1 For RST 08H 

148 081B 

06 


FCB 

<ZHK10H,>ZHK10H 1 For RST 10H 

149 081D 

09 


FCB 

<ZHK18H,>ZHK18H 1 For RST 18H 

150 081F 

0C 


FCB 

<ZHK20H,>ZHK20H * For RST 20H 

151 0821 

0F 


FCB 

<ZHK2BH,>ZHK28H 1 For RST 28H 

152 0823 

12 


FCB 

<ZHK30H,>ZHK30H 1 For RST 30H 

153 0825 

15 


FCB 

<ZHK38H.>ZHK38H ’ For RST 38H 

154 0827 

18 


FCB 

<ZHK66H,>ZHK66H 1 For NMI 

155 





156 



Systea initialize routine 

157 





158 0829 

1A 50 

SYSINT 

ORCC 

0X01010000 

159 082B 

4F 


CLRA 


160 082C 

IF 8B 


TFR 

A.DP Set-up DP rcg. 

161 082E 

10CE 0600 


LDS 

WSTKBTM Set-up systea stack 

162 


• 



163 


■ 

6809 

interupped vector initialize 

164 





165 0832 

30 8CD6 


LEAX 

IRQVCT.PCR Initialize data top 


138 Oh! MZ 1987.8. 


► *7'fOtff**! 


41!7n (18) 





€ 


HE SENTINEL 


166 0835 

167 0838 

168 083A 

169 

170 

171 

172 083C 

173 083F 

174 0842 

175 0845 

176 0847 

177 0849 

178 084B 

179 0840 

180 084E 

181 0850 

182 0853 

183 0855 

184 0857 

185 

186 

187 

188 0859 

189 085B 

190 085D 

191 0860 

192 0861 

193 0863 

194 0866 

195 0868 

196 0869 

197 086B 

198 

199 

200 

201 086E 

202 0870 

203 0872 

204 0874 

205 0876 

206 0878 

208 087B 

209 

210 
211 

212 0880 

213 0883 

214 0886 

215 0889 

216 088C 

217 088F 

218 

219 

220 

221 0892 

222 

223 

224 

225 0893 

226 0895 

227 0898 

228 089A 

229 089C 

230 089D 

231 089F 

232 08A1 

233 08A3 

234 08A5 

235 08A8 

236 08AA 

237 08AD 

238 08AF 

239 08B2 

240 08B4 

241 08B6 

242 08B8 

243 

244 

245 

247 

248 

249 

250 

251 

252 

253 

254 

255 

256 

257 

258 08B9 

259 08BB 

260 08BD 

261 08BE 

262 08C0 

263 

264 

265 

266 

267 

268 

269 

270 

271 

272 

273 

274 08C1 

275 08C3 

276 08C5 

277 08C7 

278 08C9 

279 

280 
281 
282 

283 

284 

285 

286 08CA 

287 08CC 

288 08CF 

289 0801 

290 08D3 

291 0805 

292 08D7 

293 08DA 

294 08DD 

295 08DF 

296 

297 

298 

299 

300 

301 

302 

303 08E1 

304 08E3 

305 08E6 

306 08E8 

307 08EB 

308 08EC 

309 08EE 

310 «8F0 

w«. mn 

312 00F5 


CE FFF2 
C6 0C 
80 7D 


31 8CD8 
CE 0000 
CC C308 
A7 C4 
AE A1 
AF 41 
33 48 
5A 

26 F5 
33 C836 
A7 C4 
AE A4 
AF 41 


86 40 
97 8B 
B7 FD0O 
4F 

97 8C 
B7 FD02 
97 BE 


86 14 
97 8A 
86 FF 
97 86 
1C AF 
16 07B8 

0005 


7E 0892 
7E 0892 
7E 0893 
7E 0892 
7E 0892 
7E 0892 


34 02 
B6 FD04 
B4 02 

26 1A 
43 

97 87 

96 8E 
2B 0C 
8A 40 
B7 FD05 

84 BF 
B7 FD05 

97 BE 
B6 FD04 

85 02 

27 F9 

35 02 


LDU 

LDB 

BSR 


#$FFF2 

012 

BLKMV1 


Interupped vector top 
Table length 
Set data 


3B 


2-80 interupped hook initialize 
LEAY ZIVTBL.PCR 


LDU 
LDD 
» STA 
LDX 
STX 
LEAU 
DECB 
BNE 
LEAU 
STA 
LDX 
STX 


0ZRST00 
0SC308 
.U 

, Y++ 
l.U 
8 ,U 

ZINTLP 

$66-$38+8.U 

,U 

, Y 

l.U 


Initialize I/O port 


LDA 

STA 

STA 

CLRA 

STA 

STA 

STA 

INCA 

STA 

STA 


#*01000000 

11TLPWK 

MTLPOT 

IRQWRK 

IRQCTL 

SBSWRK 


Init. "LPT0 s" , “CAS0: 1 
Mask all IRQ 


HKSWI3 

HKSWI2 

HKFIRQ 

HKIRQ 

HKSWI 

HKNMI 


IBRKLP 

IBRKEX 


Buzzer enablo 

Juap to coaaand handler 

LDA 020 20 sec. 

STA LPRTRY 

LDA 0255 255 char. 

STA ILIMIT 

ANDCC 0X10101111 Enable interupped 
LBRA CHDENT 

RUB $0880-* 

6809 interupped hook 

JHP IRQDMY 
JMP IRQDMY 
JHP IRQBRK 
JHP IRQDMY 
JHP IRQDMY 
JMP IRQDMY 

IRQ dunay return 
f RTI 

FIRQ handler 


PSHS 

LDA 

ANDA 

BNE 

COMA 

STA 

LDA 

BMI 

ORA 

STA 

ANDA 

STA 

STA 

LDA 


STOPF 

0X00000010 Is •BREAK’ key pressed ? 
IBRKEX No. RTI 

BRKFLG Key-board abort flag on 

itention,when sub is 


IBRKLP Don’t < 

0X01000000 

SBSOUT Atention interupped request 

0X10111111 

SBSOUT Reaove atention IRQ 

SBSWRK 
STOPF 
BITA 0X00000010 

BEQ IBRKLP Wait ’BREAK’ key open 


Systea sub-routine package 


Block transfer 1 (<256 bytes) 

IN U:Dost. top 

X:Src. top 
B:Src. len 

OUT U:Next dost, top 

X:Next src. top 
B:0 


BLKMV1 LDA ,X+ 
STA ,U+ 


Block transfer 2 


A6 80 
A7 C0 
31 3F 
26 F8 
39 


34 02 
B6 FD05 
2B FB 

96 8E 
BA 80 

97 8E 
B7 FD05 
B6 FD05 
2A FB 

35 82 


34 02 
B6 FC80 
8A 80 
B7 FC80 
8C 
34 02 

96 BE 
84 7F 
B7 FD05 

97 8E 


BRK 

BLKMV2 LDA 
STA 
LEAY 
BNE 
RTS 


U:Dest. top 
YsSrc. len 
X:Src. top 
U:Next dest. top 
Y:0 

X:Next src. top 


.U+ 

-1 .Y 
BLKMV2 


Sub—system halt 


SUBHLT PSHS A 

SUBHL1 LDA SBSIN Is sub-systea ready ? 

BMI SUBHLT No. wait 

LDA SBSWRK 

ORA 0X10000000 

STA SBSWRK 

STA SBSOUT Sub-systea halt 

SUBHL2 LDA SBSIN Is sub-systea halt sure ? 


BPL SUBHL2 


No. i 
Return 


lit 


Sub-systea restart/ready request 


RDYREQ PSHS 
LDA 
ORA 
STA 
FCB 

SUBRST PSHS 
LDA 
ANDA 
STA 


SHARED 

0X10000000 

SHARED 

$6C CMPX 0 

A 

SBSWRK 

0X01111111 

SBSOUT Restart sub-systea 


STA SBSWRK 


313 06F7 

314 

315 

316 

318 

319 

320 

321 08F9 

322 

323 

324 

325 08FA 

326 08FD 

327 08FF 

328 0901 

329 0903 

330 0905 

331 0907 

332 0909 

333 090B 

334 

335 

336 

337 090D 

338 090F 

339 0912 

340 0915 

341 0917 

342 0919 

343 091B 

344 09ID 

345 091F 

346 0921 

347 0923 

348 0925 

349 

350 

351 

352 0927 

353 0929 

354 092B 

355 092D 

356 

357 

358 

359 092F 

360 0931 

361 0933 

362 0935 

363 0937 

364 0939 

365 093B 

366 093E 

367 0940 

368 

369 

370 

371 0942 

372 0944 

373 0947 

374 094A 

375 094D 

376 094F 

377 0951 

378 0954 

379 0956 

380 0958 

381 

382 

383 

384 095A 

385 095D 

386 095F 

387 0961 

388 0964 

389 0967 

390 096A 

391 096C 

392 096F 

393 0972 

394 

395 

396 

397 0974 

398 0977 

399 0979 

400 097B 

401 097D 

402 097F 

403 0982 

404 0984 

405 

406 

407 

408 0987 

409 098A 

410 098C 

411 098E 

412 0991 

413 0994 

414 0997 

415 0999 

416 099C 

417 

418 

419 

420 099F 

421 09A1 

422 09A3 

423 09A5 

424 

425 

426 

427 09A6 

428 09A9 

429 09AB 

430 09AD 

431 09AF 

432 09B1 

433 09B2 

434 09B5 

435 

436 

437 

438 09B6 

439 09B9 

440 09BB 

441 09BD 

442 09BF 

443 09C0 

444 09C1 

445 09C2 

446 09C3 

447 09C5 

448 09C7 

449 

450 

451 

452 09C8 

453 09CB 

454 09CE 

455 09D1 

456 09D3 

457 09D4 

458 09D6 

459 


PULS PC.A 

*♦+ I/O handler +++ 


Duaay GAP for coaaand error 
CMDUMY RTS 


CE FC82 
86 OA 
8D C9 
A 7 C4 
80 E7 
8D C3 
EC 41 
DD 84 
20 D4 


34 46 
CE FC81 
CC 0303 
8D B3 
6F C0 
ED Cl 
86 12 

A7 CO 
DC 84 
ED C4 

35 46 
20 C5 


34 06 
D6 89 
CA 01 
20 06 


34 06 
D6 89 
C4 3E 
D7 89 
86 0C 
8D 8F 
FD FC82 
8D AC 

35 86 


34 46 
CE FC81 
CC 0302 
17 FF7D 
6F C0 
ED Cl 
CC 1B39 
ED C4 

35 46 
20 92 


EC A810 
IE 89 
IF 01 
CE FCB2 
CC 0108 
17 FF60 
A7 C0 
17 FF4A 
17 FF7A 
20 86 


CE FC82 
86 0C 
E6 2B 
C4 3F 
D7 89 
17 FF48 
ED C4 
16 FF65 


EC A810 
IE 89 
IF 01 
CC OB0A 
CE FC82 
17 FF33 
A7 C0 
17 FF1D 
16 FF4D 


A6 2B 
84 IF 
97 88 


B6 FD05 
2B FB 
A6 2B 
84 77 
97 8F 
43 

B7 FD37 


BE FD38 
A6 2B 
E6 2B 
84 07 


17 FF64 
17 FF3F 
17 FF56 
8D 0D 


Get cursor locatii 


#SHARED+2 

#$0A 

SUBHLT 

,U 

SUBRST 
SUBHLT 
1 .U 
CSRX 
RDYREQ 


BSR 

LDD 

STD 

BRA 


* Set cursor locatio 

SET XY PSHS U.A.B 

LDU 0SHARED+1 
LDD #$0303 P 
BSR SUBHLT 
CLR .U*- 
STD .U++ 

LDA #SBA 
STA .U-f 
LDD 
STD 
PULS U.A.B 
BRA SUBRST 

* Display cursor 


CSRX 


DSPCUR PSHS 
LDB 
ORB 


CRCNSM Crrent console node 
#*00000001 Set cursor display flag. 
CLRCU1 


* Clear cursor 

CLRCUR PSHS A.B 

LDB CRCNSM Crrent console aode 

ANDB #*00111110 Reaove cursor display flag. 

CLRCU1 STB CRCNSM 

LDA #$0C CNSCTL 

BSR SUBHLT 

STD SHARED+2 

BSR SUBRST 

PULS PC.A.B 


Flash key buffer 


U.A.B 
#SHARED+1 
#$0302 
SUBHLT 
", U+ 

.U++ 

#ESC00+' 9 
,U 

U.A.B 

SUBRST 


LDD 

LBSR 

CLR 

STD 

LDD 

STD 

PULS 

BRA 


Console initialize 


LDD 

EXG 

TFR 

LDU 

LDD 


16. Y 
A.B 
D.X 

#SHARED+2 

#$0108 


Initialize paraaeter (HL) 


LBSR SUBHLT 
STA ,U+ 

LBSR BLKMV1 
LBSR SUBRST 
BRA GET_XY 

Console node control 


LDB 

ANDB 

STB 


#SHARED+2 

#$0C CNSCTL 

ll.Y Console aode paraaeter (A) 

#*00111111 


LBSR SUBHLT 


Crrent console aode 


Set console TAB location 


TAB table top addr. (HL) 


TABSET LDD 16.Y 
EXG A.B 
TFR D.X 

LDD #$0B0A TABSET 

LDU #SHARED+2 
LBSR SUBHLT 
STA ,U+ 

LBSR BLKMV1 
LBRA SUBRST 

* Set console attribute code 

SETATR LDA ll.Y Attribute code (A) 

ANDA #*00011111 
STA CRATTR 
RTS 

* Multi page control 


SBSIN 

MPCTL 

ll.Y Multi page paraaeter (A) 

#*01110111 
MPWRK 

MLTPAG 


LDA 

BMI 

LDA 

ANDA 

STA 

COMA 

STA 

RTS 


Color palette control 
LDX #COLPLT 

LDA ll.Y Coror palette paraaeter (A) 

LDB ll.Y Coror palette paraaeter (A) 

ANDA #*00000111 

LSRB 

LSRB 

LSRB 

LSRB 

ANDB #*00000111 

STA B.X 

RTS 

Input 1 charactor froa key-board with wait 


INCH 


LBSR CLRCUR 
LBSR SET XY 
LBSR DSPCUR 
INCHLP BSR INCHR1 
TSTA 

BEQ INCHLP 
RTS 


Clear cursor 

Set cursor locatioi 

Display cursor 


► ! 


KWi SfcAJHS (17) 
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460 

461 

462 09D7 17 FF55 

463 09DA 17 FF30 

464 09DD 17 FF47 

465 09E0 96 67 

466 09E2 27 09 

467 09E4 0F 87 

468 09E6 86 IB 

469 09E8 A7 2B 

470 09EA 16 FF55 


Input 1 charactor from key-board real time 


INCHR LBSR CLRCUR 
LBSR SET_XY 
LBSR DSPCUR 
INCHR1 LDA BRKFLG 
BEQ INCHR2 
CLR BRKFLG 
LDA #ESC 
STA 11.Y 
LBRA FLSBUF 


Clear cursor 
Set cursor location 
Display cursor 
Break ? 

No. 


Key code (A) 


472 09ED CE FC82 

473 09F0 CC 2900 

474 09F3 17 FED4 

475 09F6 ED C4 

476 09F8 17 FEF1 

477 09FB 17 FECC 

478 09FE EC 41 

479 0A00 17 FEDE 

480 0A03 5D 

481 0A04 27 0D 

482 0A06 81 87 

483 0A08 26 02 

484 0A0A 86 7B 

485 0A0C 81 FI 

486 0A0E 26 04 

487 0A10 86 7F 

488 0A12 21 

489 0A13 4F 

490 0AI4 A7 2B 

491 0A16 39 

492 

493 

494 

495 0A17 A6 2A 

496 0A19 D6 87 

497 0A1B 27 06 

498 0A1D 17 FF22 

499 0A20 8A 40 

500 0A22 8C 

501 0A23 84 BF 

502 0A25 A7 2A 

503 0A27 0F 87 

504 0A29 39 

505 

506 

507 

508 0A2A A6 2B 

509 0A2C 34 02 

510 0A2E 17 FEFE 

511 0A31 17 FED9 

512 0A34 17 FEF0 

513 0A37 0C 83 

514 0A39 CE FC81 

515 0A3C CC 0301 

516 0A3F 17 FE88 

517 0A42 6F C0 

516 0A44 ED Cl 

519 0A46 35 02 

520 0A46 81 7B 

521 0A4A 26 02 

522 0A4C 86 87 

523 0A4E 81 7F 

524 0A50 26 02 

525 0A52 66 FI 

526 0A54 A7 C4 

527 0A56 81 0D 

528 0A58 26 0D 

529 0A5A 0F 83 

530 0A5C 86 11 

531 0A5E D6 88 

532 0A60 ED 41 

533 0A62 86 03 

534 0A64 B7 FC83 

535 0A67 17 FE82 

536 0A6A 16 FE8D 


INCHR2 


LDU 

LDD 

LBSR 

STD 


LBSR 

LDD 

LBSR 

TSTB 


INCHRA 


INCHR3 

INCHR4 


CMPA 
BNE 
LDA 
CMPA 
BNE 
LDA 
FCB 
CLR A 
STA 
RTS 


*SHARED+2 

*$2900 

SUBHLT 


INCHR3 

INCHRA 

*’< 

*PA1 

INCHR4 

*DEL 

$21 

11.Y 


INKEY 


BRN 

Key code (A ) 


Check 'BREAK' 


key status 


CHKBRK LDA 10.Y (F) 

LDB BRKFLG 

BEQ CHKBR1 

LBSR FLSBUF 

ORA **01000000 

FCB S8C CMPX * 

CHKBR1 ANDA **10111111 

STA 10.Y Break key flag (F) 

CLR BRKFLG 

RTS 


Output chractor to display 


OUTCH LDA 
OUTCH0 PSHS 
LBSR 
LBSR 


OUTCHA 


OUTCH1 


INC 

LDU 

LDD 

LBSR 

CLR 

STD 

PULS 

CMPA 

BNE 

LDA 

CMPA 

BNE 

LDA 

STA 

CMPA 


CLR 

LDA 


STD 

LDA 

STA 

OUTCH2 LBSR 
LBRA 


11. Y 
A 

CLRCUR 

SET XY 

DSPCUR 

CNTCHR 

0SHARED+1 

*$0301 

SUBHLT 

.U+ 

.U++ 

A 

*'< 

OUTCHA 

»'■ 

*DEL 
OUTCH1 
*PAI 
.U 
*CR 

OUTCH2 

CNTCHR 

*SF 

CRATTR 
1 .U 

#3 

SHARED+3 
SUBRST 
GET XY 


Put char, code (A) 

Clear cursor 

Set cursor location 

Display cursor 


PUT 


53B 

539 

540 

541 

542 

543 0A6D 

544 0A70 

545 0A78 

546 0A79 

547 0A7B 


D0 SETDP $D0 

* Sub-systein test command 1 

•Remove all modification flag S. set it on cursor loc. 


00 

59 

93 

D3BF 

90 


TST1 


FCB 0.0.$3F 
FCC 'YAMAUCHI' 

FCB $93 

FDB TST11—TST1+_COMAR 

FCB $90 


549 0A7C 

550 0A7E 

551 0A80 

552 0A82 

553 0A84 

554 0A86 

555 0A88 

556 0A8A 

557 0A8C 

558 0A8E 

559 0A90 

560 0A92 

561 0A94 

562 0A96 

563 0A98 

564 0A9A 

565 0A9C 

566 0AA0 

567 0AA2 

568 0AA4 

569 0AA6 

570 0AA8 

571 0AAB 

572 0AAE 


9E 54 TSTll 

A6 84 TST12 

84 BF 
A7 80 
9C 56 

25 F6 
9E 5C 
A6 84 
8A 40 
A7 84 

30 01 TST13 

A6 84 
2B 04 
9C 56 
23 F6 

30 IF TST14 

A6 89F830 

26 04 
A6 84 
2A F4 

IF 12 TST15 

BD EA7F 
BD E3C3 
7E E787 


LDX GTTOPA 
LDA ,X 

ANDA **10111111 
STA .X+ 

CMPX GTBTMA 
BCS TST12 
LDX CAAD 
LDA .X 

ORA **01000000 
STA .X 
LEAX l.X 
LDA .X 
BMI TST14 
CMPX GTBTMA 
BLS TST13 
LEAX -l.X 
LDA -2000. X 
BNE TST15 
LDA .X 
BPL TST14 
TFR X.Y 

JSR GETENA 
JSR CBADR 
JMP CTOB 


574 


0AB1 TST1EN EQU 


576 00 

577 

578 

579 

580 0AB1 17 FE7B 

581 0AB4 17 FE56 

582 0AB7 17 FE6D 

583 0ABA 0F 87 

584 0ABC EC 2E 

585 0ABE IE 89 

586 0AC0 IF 01 

587 0AC2 CC 0000 

588 0AC5 A7 80 

589 0AC7 5A 

590 0AC8 26 FB 

591 0ACA CE FC81 

592 0ACD CC 0400 

593 0AD0 17 FDF7 

594 0AD3 6F C0 

595 0AD5 ED C4 

596 0AD7 17 FE12 

597 0ADA 30 8C90 

598 0ADD CE FC80 

599 0AE0 17 FDE7 

600 0AE3 A6 43 

601 0AE5 E6 41 

602 0AE7 2A 0E 

603 0AE9 6F 41 

604 0AEB C6 64 

605 0AED E7 42 

606 0AEF 17 FDFA 


SETDP $00 


Input 1 line from console 


INLN 


LBSR 
LBSR 
LBSR 
CLR 
LDD 
EXG 
TFR 
LDD 

CLRBUF STA 
DECB 
BNE 

INLN1 LDU 
LDD 
LBSR 
CLR 
STD 
LBSR 
LEAX 
LDU 
LBSR 
LDA 

INLNC LDB 
BPL 
CLR 
LDB 
STB 
LBSR 


CLRCUR 

SET XY 

DSPCUR 

BRKFLG 

14, Y 

A.B 

D.X 

»S0000 

.X* 

CLRBUF 

0SHARED+1 

*$0400 

SUBHLT 

,U+ 

.U 

SUBRST 

TST1,PCR 

*SHARED 

SUBHLT 

3.U 

1 ,U 

INLNB 

1 .U 

*$64 

2.U 

SUBRST 


Clear cursor 

Set cursor location 

Display cursor 

Assume no break 

Get input buffer addr.(DE) 


GET 


Get end code 
Continue ? 
No. 

CONT 


607 0AF2 17 FDD5 LBSR SUBHLT 

608 0AF5 20 EE BRA INLNC 


610 0AF7 4D 

611 0AF8 27 0D 

612 0AFA 17 FDE4 

613 0AFD 4A 

614 0AFE 26 CA 

615 0B00 86 FF 

616 0B02 97 87 

617 0B04 17 FDC3 

618 0B07 C6 44 

619 0B09 17 FDAD 

620 0B0C 17 FDDD 

621 0B0F CE FC82 

622 0B12 86 05 

623 0B14 17 FDB3 

624 0B17 A7 Cl 

625 0B19 17 FDD0 

626 0B1C EC 2E 

627 0B1E IE 89 

628 0B20 IF 01 

629 0B22 D6 86 

630 0B24 34 04 

631 0B26 17 FDA1 

632 0B29 E6 C0 

633 0B2B C0 03 

634 0B2D 23 35 

635 0B2F 33 43 

636 0B31 A6 C0 

637 0B33 26 02 

638 0B35 86 20 

639 0B37 81 87 

640 0B39 26 02 

641 0B3B 86 7B 

642 0B3D 81 FI 

643 0B3F 26 02 

644 0B41 86 7F 

645 0B43 A7 80 

646 0B45 6A E4 

647 0B47 27 IB 

648 0B49 5A 

649 0B4A 26 E5 

650 0B4C B6 FC81 

651 0B4F 2A 13 

652 0B51 CE FC81 

653 0B54 86 64 

654 0B56 6F C0 

655 0B58 A7 Cl 

656 0B5A 17 FD8F 

657 0B5D 17 FD6A 

658 0B60 E6 C0 

659 0B62 26 CD 

660 0B64 17 FD7A 

661 0B67 32 61 

662 0B69 17 FD8E 

663 0B6C 6F 84 

664 0B6E 86 0D 

665 0B70 17 FEB9 

666 0B73 EC 2E 

667 0B75 IE 89 

668 0B77 IF 01 

669 0B79 96 87 

670 0B7B 27 07 

671 0B7D CC 1B00 

672 0BB0 ED 84 

673 0B82 D7 87 

674 0B64 39 

675 

676 

677 

678 0B85 17 FDA7 

679 0B88 17 FD82 

680 0B8B 17 FD99 

681 0B8E 0F 87 

682 0B90 CE FC82 

683 0B93 86 05 

684 0B95 17 FD32 

685 0B98 A7 C0 

686 0B9A 17 FD4F 

687 0B9D 17 FD2A 

688 0BA0 96 87 

689 0BA2 26 0A 

690 0BA4 A6 C0 

691 0BA6 27 15 

692 0BA8 17 FD36 

693 0BAB 4A 

694 0BAC 26 E2 

695 0BAE 0F 87 

696 0BB0 EC 2E 

697 0BB2 IE 89 

698 0BB4 IF 01 

699 0BB6 86 IB 

700 0BB8 A7 84 

701 0BBA 16 FD3D 


INLNB TSTA 
BEQ 
LBSR 
DECA 
BNE 
LDA 
STA 
LBSR 

INLN2 LDB 
LBSR 
LBSR 
LDU 
LDA 
LBSR 
STA 
LBSR 
LDD 
EXG 
TFR 
LDB 
PSHS 
LBSR 
LDB 
SUBB 
BLS 
LEAU 

INLN3 LDA 
BNE 
LDA 

INLN4 CMPA 
BNE 
LDA 

INLNA CMPA 
BNE 
LDA 

INLN5 STA 


CTRL-C ? 

INLN1 No. retry 

*-l 

BRKFLG Set break flag 

SUBHLT 

*TST1EN-TST1 

BLKMV1 

SUBRST 

*SHARED+2 

*$05 GETC 

SUBHLT 

, U++ • 

SUBRST 
14, Y 
A.B 


INLN6 

3.U 

,U+ 

INLN4 


Input buffer addr. (DE) 


*PAI 
INLN5 
*DEL 
, X+ 


BNE INLN3 
LDA SHARED+1 
BPL INLN6 
LDU *SHARED+1 
LDA *$64 
CLR ,U+ 

STA ,U++ 

LBSR SUBRST 
LBSR SUBHLT 
LDB ,U+ 

BNE INLN3 
INLN6 LBSR RDYREQ 
LEAS l.S 
LBSR GET_XY 
CLR .X 
LDA *CR 
LBSR OUTCH0 
LDD 14.Y 

EXG A.B 
TFR D.X 
LDA BRKFLG 
BEQ INLN7 
LDD *ESC00 
STD ,X 
STB BRKFLG 


CONT 


Set end code 

Move cursor to next pos. 
Input buffer addr. (DE) 


Input multi line from console 


INLNM LBSR 
LBSR 
LBSR 

INLNM1 LDU 
LDA 
LBSR 

INLNMA STA 
LBSR 
LBSR 
LDA 
BNE 
LDA 
BEQ 
LBSR 
DECA 
BNE 

INLNM2 CLR 
LDD 
EXG 
TFR 
LDA 
STA 
LBRA 


CLRCUR 

S ET_XY 

DSPCUR 

BRKFLG 

*SHARED+2 

*$05 

SUBHLT 

,U+ 

SUBRST 

SUBHLT 

BRKFLG 

INLNM2 

,U+ 

INLNM3 

RDYREQ 

INLNM1 

BRKFLG 

14.Y 

A.B 

D.X 

*ESC 

.X 

GET XY 


Clear cursor 

Set cursor location 

Display cursor 


GETC 


Abort 

End code is CR 
Yes CR 

Abort ? 

No. retry 

Input buffer addr. (DE) 


703 0BBD D6 86 

704 0BBF 34 04 

705 0BC1 EC 2E 

706 0BC3 IE 89 

707 0BC5 IF 01 

708 0BC7 E6 C4 

709 0BC9 33 43 

710 0BCB C0 03 

711 0BCD 23 3D 

712 0BCF A6 C0 

713 0BD1 26 02 

714 0BD3 86 20 

715 0BD5 81 87 

716 0BD7 26 02 

717 0BD9 86 7B 

718 0BDB 81 FI 

719 0BDD 26 02 

720 0BDF 86 7F 

721 0BE1 A7 60 

722 0BE3 6A E4 

723 0BE5 27 IB 

724 0BE7 5A 

725 0BE8 26 E5 

726 0BEA B6 FC81 

727 0BED 2A 13 

728 0BEF CE FC81 

729 0BF2 86 64 

730 0BF4 6F C0 

731 0BF6 A7 Cl 

732 0BF8 17 FCF1 

733 0BFB 17 FCCC 

734 0BFE E6 C0 

735 0C00 26 CD 

736 0C02 17 FCDC 

737 0C05 32 61 

738 0C07 6F 84 

739 0C09 16 FCEE 


INLNM3 LDB ILIMIT 
PSHS B 
LDD 14.Y 
EXG A.B 
TFR D.X 
LDB ,U 
LEAU 3,U 
SUBB *3 
BLS INLNM8 
IN1.NM4 LDA ,U+ 

BNE INLNM5 
LDA ** 

INLNM5 CMPA *’■ 

BNE INLNMB 
LDA *'( 
INLNMB CMPA ®PAI 

BNE INLNM6 
LDA *DEL 
INLNM6 STA ,X+ 

DEC ,S 
BEQ INLNM7 


Inout buffer addr. (DE) 


No input 

Null -> SPC 
Space 


BNE INLNM4 
LDA SHARED+1 
BPL INLNM7 
LDU *SHARED+1 
LDA *$64 
CLR ,U+ 

STA ,U++ 

LBSR SUBRST 
LBSR SUBHLT 
LDB .U+ 

BNE INLNM4 
1NLNM7 LBSR RDYREQ 
LEAS 1 ,S 
CLR .X 
LBRA GET XY 


741 0C0C CE FC82 

742 0C0F 86 03 

743 0C11 7F FCB3 

744 0C14 20 82 

745 

746 

747 

748 0C16 17 FD16 

749 0C19 17 FCF1 

750 0C1C 17 FD08 

751 0C1F EC 2E 

752 0C21 IE 89 

753 0C23 IF 01 


*SHARED+2 

*$03 

SHARED+3 

INLNMA 


Output 1 line to console 


OUTI.N LBSR CLRCUR 
LBSR SET_XY 
LBSR DSPCUR 
LDD 14,Y 
EXG A.B 
TFR D.X 


Clear cursor 

Set cursor location 

Display cursor 

Output buffer addr. (DE) 


140 Oh! MZ 1987.8. 


► MZ-2861<7)&'i^h!i! ‘Jf£> r &b *) Cj It, <:**!#* I 0, ht 

*ff iE& (22) 


K 


HE SENTINEL 


754 0C25 

755 0C27 

756 0C29 

757 0C2C 

758 0C2F 

759 0C32 

760 0C34 

761 0C36 

762 0C38 

763 0C3A 

764 0C3C 

765 0C3F 

766 0C42 

767 0C44 

769 0C47 

770 0C49 

771 0C4B 

772 0C4D 

773 0C4F 

774 0C51 

775 0C53 

776 0C55 

777 0C57 

778 0C58 

779 0C5A 

780 0C5C 
78V 0C5E 

782 0C60 

783 0C63 

784 0C66 

786 0C68 

787 0C6A 

788 0C6D 

789 0C70 

790 0C73 

791 0C76 

792 0C79 

793 0C7B 

794 0C7D 

795 0C7F 

796 0C81 

797 0C83 

798 0CB6 

799 

800 
801 

802 0C88 

803 0C8B 

804 0C8D 

805 0C90 

806 

807 

808 

809 0C91 

810 0C94 

811 0C96 

812 0C99 

813 0C9C 

814 0C9F 

815 0CA2 

816 0CA4 

817 0CA6 

818 0CA8 

819 0CAA 

820 0CAD 

821 0CB0 

822 

823 

824 

825 0CB3 

826 0CB6 

827 0CB8 

828 0CBB 

829 0CBD 

830 0CC0 

831 0CC2 

832 0CC4 

833 0CC7 

834 0CCA 

835 0CCD 

836 0CCF 

837 0CD1 

838 0CD3 

839 0CD5 

840 0CD7 

841 0CD9 

842 0COB 

843 0CDD 

844 0CDF 

845 0CE1 

847 0CE4 

848 0CE6 

849 0CE8 

851 

852 

853 

854 0CEB 

855 0CEE 

856 0CF0 

857 0CF3 

858 0CF5 

859 0CF7 

860 0CFA 

861 0CFC 

862 0CFE 

863 0D00 

864 0D02 

865 0D04 

866 0006 

867 0D08 

868 0D0A 

869 0D0C 

870 0D0E 

871 0D10 

872 0012 

873 0D14 

874 

875 

876 

877 0D17 

878 0019 

879 001B 

880 0D1D 

881 001F 

882 0021 

883 0D23 

884 0D25 

885 0D27 

886 0D29 

887 0D2B 

888 0O2D 

889 0D2F 

890 0D31 

891 0D34 

892 0D37 

893 0039 

894 0O3B 

895 0D3D 

896 0D3F 
697 0040 

898 0042 

899 0D44 

900 0046 


A6 2B 
34 02 
CE FC81 
CC 0300 
17 FC98 
6F C0 
A7 Cl 
A6 80 
A1 E4 
26 0B 
F7 FC83 
17 FCAA 
32 61 
16 FCB3 

0C 83 
81 7B 
26 02 
86 87 
81 7F 
26 02 
86 FI 
A 7 C0 


SC 
81 0D 
27 0C 
Cl 7C 
25 06 
F7 FC83 
17 FC86 
20 Cl 

0F 83 
F7 FC83 
17 FC7C 
CE FC81 
CC 0302 
17 FC51 
6F C0 
ED Cl 
86 11 
06 88 
ED C4 
17 FC66 
20 A1 


17 FC6F 
DC 84 
ED A810 


EC A810 
DD 84 
17 FC96 
17 FC71 
17 FC2B 
B6 FC80 
27 02 
86 01 
A7 2A 
86 80 
B7 FC80 
17 FC3C 
16 FC74 


CE FC82 
86 06 
17 FCOF 
A 7 C0 
EC A810 
ED Cl 
ED C4 
17 FC25 
17 FC00 
B6 FC80 
26 15 
A7 2A 
A6 5F 
81 87 
26 02 
86 7B 
81 FI 
26 02 
86 7F 
A7 2B 
16 FBFD 

86 01 
A7 2A 
16 FBF6 


CE FC81 
86 07 
17 FBD7 
6F C0 
A7 C0 
EC A810 
ED Cl 
ED Cl 
96 88 
C6 01 
ED Cl 
A6 2B 
81 7B 
26 02 
86 87 
81 7F 
26 02 
86 FI 
A 7 C4 
16 FBD5 


A6 2B 
81 00 
26 04 
8D 02 
86 0A 
81 7B 
26 02 
86 87 
81 7F 
26 02 
86 FI 
D6 8A 
34 04 
8E 3B2F 
F6 FD02 
C5 06 

26 0F 
C5 02 

27 03 
54 

24 11 
30 IF 
26 EE 
6A E4 


LDA 

OUTLN0 PSHS 

0UTLN1 LDU 
LDD 
LBSR 
CLR 
STA 

0UTLN2 LDA 
CM PA 
BNE 
STB 
LBSR 
LEAS 
LBRA 

0UTLN3 INC 
CM PA 
BNE 
LDA 

OUTLNA CMPA 
BNE 
LDA 

0UTLN4 STA 
INCB 
CM PA 
BEQ 
CMPB 
BCS 
STB 
LBSR 
BRA 


11 .Y 
A 

/'SHARED* 1 
O$0300 
SUBHLT 
,U+ 

,U++ 

,X+ 

,S 

0UTLN3 
SHARED+3 
SUBRST 
1 ,S 

GET_XY 

CNTCHR 


ODEL 

OUTLNA 

OPAI 

,U+ 

OCR 

0UTLN5 

#124 

0UTLN2 

SHARED+3 


Delia!tor (A) 


0UTLN1 


LBSR SUBRST 
LDU OSHARED+1 
LDD O$0302 PUT 
LBSR SUBHLT 
CLR ,U+ 

STD .U++ 

LDA 0SF 
LDB CRATTR 
STD ,U 
LBSR SUBRST 
BRA 0UTLN1 

* Read cursor location 

POS XY LBSR GET XY 
LDD CSRX 

STD 16,Y Cursor X-Y pos. (HL) 

RTS 


* Set cursor locatioi 

LOCATE LDD 16.Y 


LDA 

LOCOK STA 
LDA 
STA 


CSRX 
CLRCUR 
LBSR SET XY 
LBSR SUBHLT 
SHARED 
LOCOK 


STD 


LDA 


01 


10,Y 
O$80 
SHARED 
SUBRST 
LBRA DSPC1JR 


Cursor X-Y pos. (HL) 


If Error Set CarryFlag 


Display cursor 


Read choractor on screen 


STA 

LDD 

STD 

STD 

LBSR 

LBSR 

LDA 

BNE 

STA 

LDA 

CMPA 

BNE 

LDA 

SCREDI CMPA 
BNE 
LDA 

SCRED2 STA 
LBRA 


OSHARED+2 
«$06 
SUBHLT 
,U+ 


16,Y 
,U+ + 

,U 

SUBRST 

SUBHLT 

SHARED 


Read X-Y pos. (HL) 


SCRED1 

0 ’( 

OPAI 

SCRED2 

ODEL 

11 ,Y 

RDYREQ 


Choractor code (A) 


ERRSCR LDA O$01 
STA 10.Y 
LBRA RDYREQ 


Write charactor to screen 


SCWRIT LDU 
LDA 
LBSR 
CLR 
STA 
LDD 
STD 
STD 
LDA 
LDB 
STD 
LDA 
CMPA 
BNE 
LDA 

SCWRT1 CMPA 
BNE 
LDA 

SCWRT2 STA 
LBRA 


OSHARED+1 

O$07 

SUBHLT 

,U+ 

,U+ 

16.Y 
,U++ 

,u++ 

CRATTR 

01 

,U++ 

11 .Y 
0 '{ 

SCWRT1 

trm 

ODEL 

SCWRT2 

OPAI 

,U 

SUBRST 


Write X-Y pos. (HL) 


Charactor code (A) 


Output 1 charactor to line printer 


0TLPC2 

OTLPCB 


: LDA 
l CMPA 
BNE 
BSR 
LDA 
CMPA 
BNE 
LDA 
CMPA 
BNE 
LDA 
) LDB 
PSHS 
: LDX 
. LDB 
BITB 
BNE 
BITB 
BEQ 
LSRB 
BCC 
. LEAX 
BNE 
DEC 


11. Y 
OCR 

0TLPC2 
OTLPC2 
OLF 
O' ( 

OTLPCB 

trm 

ODEL 

0TLPC3 

OPAI 

LPRTRY 

B 

015151 

MTLPIN 

0X00001000 

0TLPC5 

0X00000010 

OTLPCA 

0TLPC6 
-1 .X 
0TLPC4 


Charactor code (A) 


Retry count 


1 sec tiner 


901 0D48 

902 0D4A 

903 0D4C 

904 0D4E 

905 0D50 

906 0D51 

908 0D53 

909 0D56 

910 0DS8 

911 0D5A 

912 0D5D 

913 0D5F 

914 0D62 

915 0D64 

916 0D66 

917 0D68 

918 0D6A 

919 0D6B 

920 

921 

922 

923 0D6D 

924 0D6F 

925 0D71 

926 0D73 

927 0D75 

928 0D77 

929 0D79 

930 0D7B 

931 0D7D 

932 0D7F 

933 0D81 

934 

935 

936 

937 0D83 

938 0D66 

939 0DB8 

940 0D8A 

941 0D8C 

942 0D8E 

943 0D90 

944 0D92 

945 0D95 

946 0D97 

947 0D9A 

948 0D9D 

949 

950 

951 

952 0DA0 

953 0DA3 

954 0DA5 

955 0DA7 

956 0DA9 

957 0DAB 

958 0DAD 

959 0DAF 

960 0DB2 

961 0DB5 

962 0DB8 

964 

965 

966 

967 

968 

969 0DBB 

970 0DBE 

971 0DC6 

972 0DC7 

973 0DC9 

975 0DCA 

976 0DCB 

977 0DCD 

978 0DCF 

979 0DD1 

980 0DD3 

981 0DD5 

982 0DD7 

983 0DD9 

984 0DDA 

985 0DDB 

986 0DDE 

987 0DEO 

988 0DE2 

989 0DE4 

990 0DE6 

991 0DE8 

992 0DEB 

993 0DED 

994 0DEF 

995 0DF2 

997 0DF4 

998 0DF5 

999 0DF6 

1000 0DF8 

1001 0DFB 

1003 

1005 

1006 

1007 

1008 

1009 0DFC 

1010 0DFF 

1011 0E01 

1012 0E03 

1013 0E05 

1014 0E06 

1015 0E09 

1016 0E0B 

1017 OE0D 

1018 0E10 

1019 0E12 

1020 0E15 

1021 0E18 

1022 0E1B 

1023 0E1D 

1024 0E20 

1025 0E23 

1026 0E26 

1027 0E29 

1028 0E2C 

1029 0E2E 

1030 0E31 

1031 0E33 

1032 0E34 

1033 0E37 

1034 

1035 

1036 

1037 0E38 

1038 0E3B 

1039 0E3D 

1040 0E3F 

1041 0E41 

1042 0E42 

1043 0E45 

1044 0E47 

1045 0E49 

1046 0E4D 

1047 0E4F 


26 E7 
A6 2A 
8 A 01 
A7 2A 


84 BF 
B7 FD00 
8A 40 
B7 FD00 
97 8B 
A6 2A 
84 FE 
A7 2A 
4F 

35 82 


EC 2E 
IE 89 
IF 03 
E6 2B 

34 04 
A6 CO 
A1 E4 
27 04 
8D 9A 
24 F6 

35 82 


EC A810 
IE 69 

34 06 
E6 2D 
Cl 80 
23 02 
C6 80 
8E FC80 

35 40 
17 FB30 
17 FB1C 
16 FB41 


EC A810 
IE 89 
IF 01 
E6 2D 
Cl 80 
23 02 
C6 80 
CE FC80 
17 FBI5 
17 FB01 
16 FB31 

D0 


8E 

0002 
IF 10 
84 CO 
34 02 
DC IF 
84 3F 
C4 E0 
43 
53 

C3 0001 
30 8B 
IF 10 
84 3F 
AA E0 
IF 01 
B5 D409 
20 07 
A6 84 
B7 D383 
20 04 

86 


BNE 

0TLPC5 LDA 
ORA 
STA 
COMA 
PULS 

0TLPC6 STA 
LDA 
ANDA 
STA 
ORA 
STA 
STA 

0TLPC7 LDA 
ANDA 
STA 
CLRA 
PULS 


OTLPCC 
10. Y 

0X00000001 

10,Y Set error code (F) 

PC.A 

LPDTOT 

MTLPWK 

0X10111111 

MTLPOT 

0X01000000 

MTLPOT 

MTLPWK 

10, Y 

0X11111110 
10.Y (F) 


PC.A 


OUTLPL LDD 
EXG 
TFR 
LDB 
PSHS 

0TLPL1 LDA 
CMPA 


Output 1 line to line printer 
14,Y 


Output buffer addr. (DE) 
Del latter (A) 


0TLPL2 

0TLPC1 

0TLPL1 


0TLPL2 PULS PC.A 


Input sub-systen packet 


LDD 

EXG 

PSHS 

LDB 


LDB 

SUBIN1 LDX 
PULS 


Packet addr. (HL) 


Packet length (B) 


SUBHLT 
LBSR BLKMV1 
LBRA RDYREQ 

Output sub-systea packet 


SUBOUT LDD 16.Y 
EXG A. B 
TFR D.X 
LDB 13. Y 
CMPB OS80 


Packet addr. (HL) 


Packet length (B) 


BLS 
LDB 

SUB0T1 LDU 
LBSR 


TST2 FCB 
FCC 
FCB 
FDB 
FCB 

TST21 FCB 

TST22 RMB 
TFR 
ANDA 
PSHS 
LDD 
ANDA 
ANDB 
COMA 
COMB 
ADDD 
LEAX 
TFR 
ANDA 
ORA 
TFR 
BITA 

TST23 BRA 
LDA 
STA 
BRA 

TST24 FCB 

TST25 RMB 
STA 

TST26 STA 
RTS 


SUB0T1 

0$ 80 

OSHARED 

SUBHLT 

BLKMV1 

SUBRST 


0.0,S3F 
’YAMAUCHI' 

$93 

TST21-TST2+ COMAR 
$90 


$8E 


LDX i 


VOFST 

0X00111111 

0X11100000 


01 

D.X 

X.D 

0X00111111 
.S + 

D.X 

VACC 

TST24 

,X 


0DFC TST2EN EQU 


Video aeaory read 


B6 FD05 
2B FB 
96 8F 
8A 07 
43 

B7 FD37 
EC 2E 
IE 89 
ED 8CBB 
86 21 
A7 8CD6 
30 8CA3 
CE FC00 
C6 41 
17 FAAA 
17 FA96 
17 FAC6 
17 FAA1 
B6 FC83 
A7 2B 
17 FAB0 
96 8F 
43 

B7 FD37 


VMREAD LDA 
BMI 
LDA 
ORA 
COMA 
STA 
LDD 
EXG 
STD 
LDA 
STA 
LEAX 
LDU 
LDB 
LBSR 
LBSR 
LBSR 
LBSR 
LDA 
STA 
LBSR 
LDA 
COMA 
STA 
RTS 


SBSIN 

VMREAD 

MPWRK 

0X00030111 

MLTPAG 
14.Y 
A.B 

TST22.PCR 
o$21 Bl 

TST23.PCR 
TST2.PCR 
OSHARED 
OTST2EN-TST2 
SUBHLT 
BLKMV1 
SUBRST 
SUBHLT 
SHARED+3 
11 .Y 
RDYREQ 
MPWRK 

MLTPAG 


Video aeaory addr. (DE) 


Video aeaory data (A) 


Video aeaory write 


B6 FD05 VMWRIT LDA SBSIN 


2B FB 
96 8F 
8A 07 
43 

B7 FD37 
EC 2E 
IE 89 
ED 8DFF7E 
86 20 
A7 8C99 


BMI 

LDA 

ORA 

COMA 

STA 

LDD 

EXG 

STD 

LDA 

STA 


VMWRIT 

MPWRK 

0X00000111 

MLTPAG 
14,Y 
A, B 

TST22.PCR 

e$20 

TST23.PCR 


Vide aoaory addr. (DE) 


) 6*«C ! i T„ fcffl (42) SXfflHff 


FM-7/77HS S-OS “SWORD" 141 


1048 0E52 

1049 0E54 

1050 0E57 

1051 0E5B 

1052 0E5E 

1053 0E60 

1054 0E63 

1055 0E66 

1056 0E69 

1057 0E6C 

1058 0E6E 

1059 0E70 

1060 0E71 

1061 0E74 

1063 

1064 

1065 

1066 

1067 

1068 0E75 

1069 0E78 

1070 0E80 

1071 0E81 

1072 0E83 

1074 0E84 

1075 0E85 

1076 0E87 

1077 0E8A 

1078 0E8C 

1079 0E8E 

1080 0E91 

1082 0E93 

1083 0E94 

1084 0E95 

1085 0E97 

1086 0E9A 

1088 

1090 

1091 

1092 

1093 

1094 0E9B 

1095 0E9D 

1096 0E9F 

1097 0EA2 

1098 0EA4 

1099 0EA7 

1100 0EAA 

1101 0EAD 

1102 0EAF 

1103 0EB2 

1104 0EB5 

1105 0EB8 

1106 0EBB 

1107 0EBE 

1108 0EC0 

1109 

1110 
till 

1112 0EC3 

1113 0EC5 

1114 0EC7 

1115 0ECA 

1116 0ECC 

1117 0ECF 

1118 0ED1 

1119 0ED4 

1120 0ED7 

1121 0EDA 

1122 0EDC 

1123 0EDF 

1124 0EE2 

1126 

1127 

1126 

1129 

1130 0EE5 

1131 0EE7 

1132 0EE8 

1133 0EEA 

1134 OEEC 

1135 0EEE 

1136 0EF0 

1137 0EF2 

1138 0EF4 

1139 0EF6 

1140 0EF9 

1141 0EFB 

1142 0EFD 

1143 0EFF 

1144 0F01 

1145 0F03 

1146 0F04 

1147 0F06 

1148 0F08 

1149 0F09 

1150 0F0B 

1151 0F0D 

1152 0F0E 

1153 0F10 

1154 0F12 

1155 0F14 

1156 0F15 

1157 0F16 

1158 0F17 

1159 0F18 

1160 0F19 

1161 0F1A 

1162 0F1C 

1163 0F1E 

1164 0F20 

1165 0F22 

1166 0F24 

1167 0F26 
1166 0F28 

1169 0F2A 

1170 0F2C 

1171 0F2E 

1172 0F30 

1173 0F31 

1174 0F33 

1175 0F37 

1176 0F39 

1177 0F3B 

1178 0F3D 

1179 0F3F 

1180 0F41 

1181 0F43 

1182 0F45 

1183 0F47 

1184 0F49 

1185 0F4B 

1186 0F4D 

1187 0F4F 

1188 0F51 

1190 0F53 

1191 0F55 

1192 0F57 

1193 0F58 

1194 0F5A 


A6 2B 
A7 BC9E 
30 8DFF60 
CE FC80 
C6 41 
17 FA67 
17 FA53 
17 FA83 
B6 FD05 V 
2B FB 
96 8F 
43 

B7 FD37 


LDA 

STA 

LEAX 

LOU 

LDB 

LBSR 


n.r 

TST25.PCR 
TST2.PCR 
•SHARED 
#TST2EN-TST2 
SUBHLT 
LBSR BLKMV1 
LBSR SUBRST 
LDA SBSIN 
VMWRI1 
HPWRK 


Video aeaory dale (A) 


LDA 

COMA 

STA 

RTS 


MLTPAG 


Sub-systea test coaaand 3 
Read or write aub-systea aeaory 


BE 
0002 
B5 D409 
20 07 
A6 84 
B7 D383 
20 04 

86 
0001 
A7 84 
B7 D409 


FCB 

FCC 

FCB 

FOB 

FCB 


LDA 

STA 

BRA 

FCB 

RMB 

STA 

STA 

RTS 


0.0.$3F 
’YAMAUCHI' 

$93 

TST31-TST3+ COMAR 
$90 

$8E LDX # 


.X 

COMAR+3 

TST36 


0E9B TST3EN EQU 


Sub-aystea aeaory read 


EC 2E 
IE 89 
ED 8CE3 
86 21 
A7 BCE3 
30 BCCB 
CE FC80 
C6 26 
17 FA18 
17 FA04 
17 FA34 
17 FA0F 
B6 FC83 
A 7 2B 
16 FA1E 


EC 2E 
IE 89 
ED 8CBB 
86 20 
A7 8CBB 
A6 2B 
A7 8CC0 
30 8C9E 
CE FC80 
C6 26 
17 F9EB 
17 F9D7 
16 FA07 


SBREAD LDD 14.Y 


STD 

LDA 

STA 

LEAX 

LDU 

LDB 

LBSR 

LBSR 

LBSR 

LBSR 

LDA 

STA 

LBRA 


A,B 


Sub—system addr. (DE) 


TST32.PCR 

*$21 BRI 

TST33.PCR 

TST3.PCR 

//SHARED 

•TST3EN-TST3 

SUBHLT 

BLKMV1 


SUBHLT 
SHARED-O 

11 ,Y Sub—systea data (A) 

RDYREQ 


Sub-systea aeaory write 


STD 

LDA 

STA 

LDA 

STA 

LEAX 

LDU 

LDB 

LBSR 

LBSR 

LBRA 


14. Y 
A.B 

TST32.PCR 

#$20 

TST33.PCR 
11 .Y 

TST35.PCR 

TST3,PCR 

•SHARED 

#TST3EN-TST3 

SUBHLT 

BLKMV1 

SUBRST 


Sub-aystea addr. (DE) 


Sub-systea data (A) 


FD 


86 0A 
6C 
86 09 
34 09 
C6 FD 
IF 9B 
32 78 
30 E4 
A 7 84 
EC A810 
IE 89 
IF 03 
ED 02 
A6 2E 
84 0F 


5 inch floppy disk read/write 


4C 


E7 06 
EC 2E 
IE 89 


58 

49 

84 3F 
A7 04 
A6 2C 
84 03 
A7 07 
E6 2B 

34 74 F 

8D 4B 

35 74 
A 7 01 

26 23 
5A 

27 30 

33 C90100 
EF 02 
6C 05 
A6 05 
81 10 
23 E5 
86 01 
A7 05 
6C 06 
A6 06 
81 01 
23 D9 
6F 06 
6C 04 
20 D3 


LDB 
TFR 
LEAS 
LEAX 
STA 
LDD 
EXG 
TFR 
STD 
LDA 
ANDA 
INCA 
STA 
LDA 
CLRB 
BITA 
BEQ 
INCB 
» STB 
LDD 
EXG 
AS LB 
ROLA 
AS LB 
ROLA 
AS LB 
ROLA 
ANDA 
STA 
LDA 
ANDA 
STA 
LDB 
» PSHS 
BSR 
PULS 
STA 
BNE 
DECB 
BEQ 
LEAU 
STU 
INC 
LDA 
CM PA 
BLS 
LDA 
STA 
INC 
LDA 
CMPA 
BLS 
CLR 
INC 
BRA 


#$0A 
SBC 
#$09 
DP.CC 
#$FD 
B.DP 
-8.S 
,S 
.X 

16,Y 
A.B 
D.U 
2.X 
14. Y 

#200001111 


DREAD 
CMPX # 
DWRITE 


Read/Hrlto buffer addr. (HL) 


Record nuaber (DE) 


6.X 
14. Y 
A.B 


Record nuaber (DE) 


Record nuaber (DE) 
LSLD 


#200111111 

4. X 

12.Y Unit nuaber (C) 

*200000011 
7, X 

ll.Y Nuaber of access record (A) 

U.Y.X.B 

FDACCS 

U.Y.X.B 

1. X 
FDERR 

FDEX1T 

$100,U 

2. X 

5. X 
5, X 
#16 

FDLOOP 

*1 

5. X 
6 ,X 

6. X 
#1 

FDLOOP 

6.X 

4.X 

FDLOOP 


FDERR SUBA 


1195 0F5C 

1196 0F5D 

1197 0F5F 

1198 0F60 

1199 0F62 

1200 0F63 

1201 0F64 

1202 0F66 

1203 0F68 

1204 0F6A 

1205 0F6C 

1206 0F6D 

1207 0F6F 

1208 0F71 

1209 0F73 

1210 
1211 
1212 

1213 0F75 

1214 0F77 

1215 0F79 

1216 0F7B 


E6 2A 
A7 2B 
26 03 
C4 FE 
8C 
CA 01 
E7 2A 
32 68 
35 89 


A6 84 
81 0A 
26 03 
7E FE08 


FCB 

FDNRDY LDA 
FCB 

FDWPTC LDA 
FCB 

FDEXIT CLRA 
LDB 
STA 
BNE 
ANDB 
FCB 

FDCRON ORB 
STB 
LEAS 
PULS 


10. Y 

11. Y 
FDCRON 
#211111110 
$8C 

#200000001 
10.Y 
8.S 

PC,DP.CC 


Error status (F) 


* Floppy disk access sub-routine 

FDACCS LDA .X 

CMPA «$0A 
BNE FDACCW 
JMP DREAD 


EC A810 
IE 89 
IF 01 
6E 84 


JSR HL LDD 16.Y 
EXG A.B 
TFR D.X 
JMP ,X 


1218 0F7E 7E FE05 FDACCW JMP DWRITE 


1220 

1221 

1222 

1223 

1224 0F81 

1225 0F84 

1226 0F86 

1227 0F88 

1228 

1229 

1230 

1231 0F8A 

1232 0F8D 

1233 0F91 

1234 0F94 

1235 0F97 

1236 0F99 

1237 0F9B 

1238 0F9C 

1239 0F9E 

1240 0FA1 

1241 0FA5 

1242 0FA8 

1243 0FAA 

1244 0FAC 

1245 0FAE 

1246 0FAF 

1247 0FB1 

1248 0FB4 

1249 0FB5 

1250 0FB8 

1251 0FBB 

1252 0FBD 

1253 0FBE 

1254 0FC0 

1255 0FC2 


Call 6809 aachlne language sub-routim 


Juap addr. (HL) 


17 F93D 
30 8D0034 
CE FC80 
F6 0012 
A6 80 
A7 C0 
5A 

26 F9 
17 F94B 
30 8D0023 
CE FC80 
C6 0F 
A6 80 
A7 C0 
5A 


81 07 
26 F9 
7E FE00 


NEW ON LBSR 
LEAX 
LDU 
LDB 

INI LOP LDA 
STA 
DECB 
BNE 
LBSR 
LEAX 
LDU 
LDB 

NEWLOP LDA 
STA 
DECB 
BNE 
LBSR 
CLRA 
STA 
LDX 

PLT1NI STA 
INCA 
CMPA 
BNE 
JMP 


SUBHLT 
CNSINI.PCR 
•SHARED 
E TST4-CNSINI 
,X+ 

,u+ 

INILOP 
SUBRST 
TST4.PCR 
•SHARED 
#E TST4-TST4 


,X+ 

,U* 


MLTPAG 

#COLPLT 

.X+ 

#$07 

PLTINI 

$FE00 


Screen 7,7 
Color*!i,i) 


1260 0FC8 

1261 0FCA 

1262 0FCB 

1263 0FD3 

1264 0FD4 

1265 0FD6 

1266 

1267 

1268 
1269 

1271 

1272 

1273 

1274 0FD7 

1275 0FD9 

1276 0FDB 

1277 0FDD 

1278 0FDF 

1279 0FE1 

1280 0FE3 

1281 
1282 

1283 

1284 0FE5 

1285 0FE7 

1286 0FE9 

1287 0FEB 

1288 0FED 

1289 0FEF 

1290 0FF1 

1291 0FF3 

1292 0FF5 

1293 0FF7 

1294 0FF9 

1295 

1296 

1297 

1298 0FFB 

1299 0FFD 

1300 

1301 

1302 

1303 0FFF 

1304 1001 

1305 1003 

1306 1005 

1307 1007 

1308 1009 

1309 

1310 

1311 

1312 100B 

1313 100D 

1314 

1315 

1316 

1317 100F 

1318 1011 

1319 

1320 

1321 

1322 1013 

1323 

1324 

1325 

1326 

1328 

1329 

1330 

1331 

1332 

1333 

1334 

1335 

1336 

1337 

1338 

1339 1015 

1340 1018 

1341 101A 


0FD7 E_TST4 I 


FCB 

FCB 

FCC 

FCB 

FDB 

FCB 


1 

0.0 

$3F 

-YAMAUCHI" 

$93 

$EO00 

$90 


F922 

F983 

F99D 

F9B0 

F9C8 

F9CF 

F9DF 


F9F1 

FA00 

FA40 

FA53 

FADA 

FBAE 

FC3F 

FCB1 

FCBA 

FCDC 

FD14 


FDAC 

FDC9 

FE25 

FE61 

FEC4 

FEEC 


- Coaaand Juap table -— 


System control 


CMDUMY-CMDTBL 
INIT-CHDTBL ' 
CNSCTL-CMDTBL 
TABSET-CMDTBL 
SETATR-CMDTBL 
MPCTL-CMDTBL * 
CPCTL-CMDTBL * 


FDB 

FDB 

FDB 

FDB 

FDB 


Console I/O 

FDB INCH-CMDTBL ’ 

FDB INCHR-CMDTBL 1 

FDB CHKBRK-CMDTBL ’ 

FDB OUTCH-CMDTBL 1 

FDB INLN-CMDTBL 1 

FDB INLNM-CMDTBL ’ 

FDB OUTLN-CHDTBL 1 

FDB POS XY-CMDTBL 1 

FDB LOCATE—CMDTBL 1 

FDB SCREAD-CMDTBL ' 

FDB SCWRIT-CMDTBL 1 

Line printer handling 


Sub-systea I/O 

FDB SUBIN-CMDTBL 1 

FDB SUBOUT-CMDTBL ' 

FDB VMREAD-CMDTBL ' 

FDB VMWRIT-CMDTBL ' 

FDB SBREAD-CMDTBL ' 

FDB SBWRIT-CMDTBL ' 

Floppy disk I/O 


FDB FDWRIT-CMDTBL 

6809 control 

FDB CMDUMY-CMDTBL 
FDB JSR_HL-CMDTBL 

Systea Boot 

FDB NEW_ON-CMDTBL * 1 

♦♦ Coaaand handler ♦++ 

CHDMAX EQU '-CMDTBL 

Structure of stack shattlo 


Coaaand error 
Init. screen mode 
Console aode control 
Console TAB table set 
Set console char. attr. 
Multi page control 
Color palette control 


Input 1 char, with wait 
Input 1 char, real tlae 
Check BREAK key status 
Output 1 char. 

Input 1 line 
Input aulti line 
Output 1 line 
Read cursor pos. 

Set cursor pos. 

Read char, froa screen 
Write char, to screen 


Output 1 char to "LPT0: 
Output 1 line to "LPT0: 


Input froa sub-systea 
Output to sub-systoa 
Read data from VRAM 
Write data to VRAM 
Read data from sub—systei 
Write data to sub-systea 


0.Y 1 2 3 4 
I I I I I 

F*,A',F'.A ' ,C’ . 


20 21 22 23 


33 8CBF 
DC 80 
IE 89 


I 11 12 13 14 15 16 17 18 

I I I I I I I ! I I i ' > 

.A ,C .B .E ,D ,L .H .IXl.lXh.IYl.IYhsPCl ,PCh 


CMDHDL LEAU CMDTBL.PCR Get coaaand juap table addr. 
LDD ZSTKPT Get Interface data 

EXG A.B Addr. adjust 


142 Oh! MZ 1987.8. 
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HE SENTINEL 


1342 101C 

1343 101E 

1344 1020 

1345 1022 

1346 1023 

1347 1025 

1348 1027 

1349 1028 

1350 102A 

1351 102B 

1352 102D 

1353 102P 

1354 1031 

1356 1033 

1357 1035 

1358 1038 

1359 1039 


1363 

1364 

1365 

1367 103B 

1369 

1370 

1371 

1372 

1373 

1374 

1375 

1376 

1377 

1378 

1379 1080 

1380 1081 

1381 1083 

1382 1084 

1383 1086 

1384 1088 

1385 108* 

1386 108B 

1387 108D 

1388 108E 

1389 1090 

1390 1091 

1391 1093 

1392 1094 

1393 

1394 

1395 

1396 1096 

1397 1098 

1398 109* 

1399 109C 

1400 109E 

1401 109F 

1402 10*1 

1403 

1404 

1405 

1406 10*2 

1407 10B9 


IF 02 
*6 *4 
D6 82 


84 FE 
*7 *4 
EC C5 
AI) CB 


0100 

0300 

0314 


0004 

0002 

0002 

0002 


D.Y 

.Y 

FUNCNO 


TFR 
LDA 
LDB 
AS LB 
CHPB #CHDMAX 
CNDNRM 


Coaaand error ? 

BLS CNDNRM No. normal command 

CLRB Error command set 

ORA #*00000001 Set error flag (Carry) 
FCB $8C CNPX a 

CNDNRM ANDA #*11111110 Resot orror flag (Carry) 
STA ,Y Set error condition 

LDD B,U 

JSR D,U Call each routine 


103B END09 


++•*■ End of 6809 system module +♦+ 
RNB S1080-* 


* Symbol equation 

D1NBUF EQU $0100 

DBSTX EQU $0300 

DREGWK EQU $0300+20 


Input buffer 
Stack bottom 
Register save 


■ DINBUF EQU 100H 
• DBSTK EQU 300H 
•DREGWK EQU 300H+20 


FCB $31 * DEBUG! LD SP.DBSTK 

FCB <DBSTK,>DBSTK 

FCB $3A 1 LD A,(_W1DTH > 

FCB < WIDTH,> WIDTH 

FCB $FE,O0 • CP 80 

FCB $3E,80 ' LD A,00 

FCB $C4 ’ CALL NZ.WIDCH 

FCB <WIDCH,>WIDCH 

FCB $11 ' LD DE.DOPNN 

FCB <DOPNM,> DOPNM 

FCB $CD * CALL HSX 

FCB <NSX,»NSX 

FCB $C3 1 JP DBNAIN 

FCB <DBHAIN,>DBNAIN 

Debugger work area 


DORSTK FDB 
DORADR RNB 
DCRADR RNB 
DEDADR RNB 
DBRKF FCB 
DBRKPT RNB 
DBRKOD FCB 


Original stack 
Return addr. ’ 
Carrent addr. 
End addr. * 

BP flag ' 

Break point ' 
(Break point) ' 


•DORSTK:DW 0400H 
DORADR:DS 2 
DCRADR:DS 2 
DEDADR:DS 2 
DBRKL: DB 0 
DBRKPT:DS 2 
DBRKOD:DB 0 


'Break point Is $' 


1421 10E8 

1422 1112 

1423 11 IF 

1424 1136 


FCB CR.EOS 


DDNPLN FCC 
FCC 
FCC 
FCB 


•Addr > +0 +1 +2 +3 
• +C +D +E +F ’ 

Sum 0123456789ABCDEF 
CR.EOS 


+5 +6 +7 +8 +9 +A +B' 


• — n — 


1476 15B8 

1477 15CA 


50 DPRTNN FCC ‘Printer Is enable.’ 
0D FCB CR,EOS 


1479 15CC 

1480 15E1 


50 

0D 


DPRTFN FCC 
FCB 


’Printer is disenable.’ 
CR.EOS 


1482 15E3 20 

1483 160B 48 

1484 1621 0D 

1485 1622 2D 

1486 1626 00 

1487 

1488 

1489 

1490 1627 F3 

1491 1629 FB 

1492 162B 4E 

1493 162D A4 

1494 162F F3 

1495 1631 3B 

1496 1633 72 

1497 1635 Al 

1498 1637 A7 

1499 1639 C0 

1500 163B F3 

1501 163D F3 

1502 163F CB 

1503 1641 F3 

1504 1643 F3 

1505 1645 IE 

1506 1647 35 

1507 1649 38 

1508 164B 93 

1509 164D DE 

1510 164F F3 

1511 1651 F3 

1512 1653 F3 

1513 1655 F3 

1514 1657 F3 

1515 1659 F3 

1516 

1517 

1518 

1519 165B 13 

1520 165C 1A 

1521 165D FE 

1522 165F D8 

1523 1660 FE 

1524 1662 38 


DREGN FCC 
FCC 


“ AF 
"HL’ IX 


BC DE HI. AF’ BC* DE’ 

1Y SP PC" 


FCC ’—R> 

FCB EOS 


Debugger command jump table 


DCNDJT FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 


FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 


< DBNOP.)DBNOP 

’DCNDJT:DW DBNOP 

: A 

<DBBRK.>DBBRK 

’ DW 

DBBRK 

<DBCAL.>DUCAL 

’ DW 

DBCAL 

<DBDMP,>DBDNP 

DW 

DBDNP 

<DBNOP,)DBNOP 

’ DW 

DBNOP 

<DBFIL,>DBFIL 

DW 

DBFIL 

< DBGO,> DBGO ’ 

DW 

DBGO 

<DBHLP,> DBHLP 

’ DW 

DBHLP 

<DBINS,>DBINS 

DW 

DBINS 

<DBJNP,>DBJNP 

DW 

DBNOP 

<DBNOP.>DBNOP 

’ DW 

DBNOP 

<DBNOP.>DBNOP 

’ DW 

DBNOP 

<DBMEM,>DBNEH 

’ DW 

DBMEH 

<DBNOP.)DBNOP 

’ DW 

DBNOP 

<DBNOP.)DBNOP 

’ DW 

DBNOP 

<DBPRT,>DBPRT 

’ DW 

DBPRT 

<DBQIT,>DBQIT 

’ DW 

DBQIT 

<DBREG.> DBREG 

’ DW 

DBREG 

<DBSEA,>DOSEA 

’ DW 

DBSEA 

<DBTRF,>DBTRF 

’ DW 

DBTRF 

<DBNOP.)DBNOP 

’ DW 

DBNOP 

<DBNOP.)DBNOP 

’ DW 

DBNOP 

<DBNOP.)DBNOP 

DW 

DBNOP 

<DBNOP.)DBNOP 

’ DW 

DBNOP 

<DBNOP.)DBNOP 

’ DW 

DBNOP 

<DBNOP.)DBNOP 

’ DW 

DBNOP 


B 

C 

D 

E 

F 

G 

H 

1 
J 
K 
L 
N 
N 
O 
P 

Q 

R 

S 

T 

U 

V 
W 
X 

Y 

2 


Skip space or control char. 


SKPSPL FCB $13 
SKPSP FCB $1A 

FCB SFE.EOS+l 
FCB $08 


FCB $FE,SPC+1 
FCB $38 


SKPSPL:INC DE 
SKPSP: LD A.(DE) 
CP EOS+1 
RET C 
CP SPC+1 
JR C.SKPSPL 


1525 1663 

1526 1664 

1527 

1528 

1529 

1530 1665 

1531 1667 

1532 1669 

1533 166A 

1534 166C 

1535 166D 

1536 

1537 

1538 

1539 166E 

1540 166F 

1541 1670 

1542 1671 

1543 1672 

1544 1673 

1545 1674 

1546 

1547 

1548 

1549 1675 

1550 1676 

1551 1678 

1552 167A 

1553 167B 

1554 167C 

1555 167E 

1556 167F 

1557 1680 

1558 1682 

1559 1684 

1560 1686 

1561 1687 

1562 1688 

1563 1689 

1564 168A 

1565 168B 

1566 16BC 

1567 168D 

1568 168E 

1569 168F 

1570 1690 

1571 1691 

1572 1692 

1573 1693 

1574 1695 

1575 1696 

1576 1698 

1577 1699 

1578 169B 

1579 169C 

1580 169D 

1581 169F 

1582 16A0 

1583 

1584 

1585 

1586 16A2 

1587 16A3 

1588 16A5 

1589 16A6 

1590 16A8 

1591 16A9 

1592 16AB 

1593 16AC 

1594 16AE 
1395 16AF 

1596 16B1 

1597 16B2 

1598 16B4 

1599 16B5 

1600 16B7 

1601 16B8 

1602 16BA 

1603 16BB 

1604 16BD 

1605 16BE 

1606 16BF 

1607 16C0 

1608 16C2 

1609 16C3 

1610 16C4 

1611 16C6 

1612 16C7 

1613 I6C8 

1614 16C9 

1615 16CB 

1616 16CD 

1617 16CE 

1618 16CF 

1619 16D1 

1620 16D2 

1621 16D3 

1622 16D5 

1623 

1624 

1625 

1626 16D6 

1627 16D7 

1628 16D9 

1629 16DA 

1630 16DB 

1631 16DC 

1632 16DE 

1633 16E0 

1634 16E1 

1635 16E2 

1636 16E3 

1637 16E4 

1638 16E6 

1639 16E7 

1640 16E9 

1641 16EA 

1642 16EB 

1643 16ED 

1644 16EE 

1645 16EF 

1646 16F0 

1647 16F1 

1648 16F2 

1649 

1650 

1651 

1652 

1653 16F3 

1654 16F4 

1655 16F6 

1656 16F7 

1657 16F9 

1658 16FA 
1639 
1660 
1661 

1662 16FB 

1663 16FC 

1664 16FE 

1665 16FF 

1666 1701 

1667 1702 

1668 1703 

1669 1704 

1670 1706 

1671 1707 


Change char, to upper case 

FCB $E6,*11011111 ’UPPER: AND 
FCB $FE,'A ’CP "A" 

FCB $D8 ’ RET C 

FCB $FE,’Z+1 ’ CP "Z“+l 

FCB $3F ' CCF 

FCB $C9 ’ RET 

Load 2 byte data to HL from (HL) 


LDHLHL FCB $F5 
FCB $7E 
FCB $23 
FCB $66 
FCB $6F 
FCB $F1 
FCB $C9 


LDHLHL .-PUSH AF 
LD *,(HL) 

INC HL 
LD H,(HL> 

LD L,A 
POP AF 
RET 


Debugger break point entry 


FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FDB 

FDB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 


$F1 ’ DBBENT:POP AF 

$ED73 ’ LD (DORSTK).SP 

<DORSTK.)DORSTK 
$E3 ’ EX (SP).HL 

$22 ‘ LD (DORADR).HL 

<DORADR.>DORADR 
$E3 ’ EX (SP).HL 

$31 ’ LD SP.DREGWK 

<DREGWK.)DREGWK 


PUSH IY 
PUSH IX 
EX AF.AF’ 

EXX 

PUSH HL 
PUSH DE 
PUSH BC 
PUSH AF 
EX AF.AF’ 

EXX 

PUSH HL 
PUSH DE 
PUSH BC 
PUSH AF 
LD DE.DBRKN 

<DBRKM,>DBRKM 

$CD ’ CALL HSX 

<MSX,>HSX 

$2A ’ LD HL,(DORADR) 

<DORADR.)DORADR 

$2B ’ DEC HL 

$CD ’ CALL PRTHL 

<PRTHL,>PRTHL 

$CD ’ CALL LTNL 

<LTNL.>LTNL 


Debugger command handler 


$FDE5 

$DDE5 

$08 

$D9 

$E5 

$D5 

$C5 

$F5 

$08 

$D9 

$E5 

$D5 

$C5 

$F5 

$11 


DBNAIN FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 


$31 ’ DBNAIN:LD SP.DBSTK 

<DBSTK,>DBSTK 

$21 ’ LD HL.DBNAIN 

< DBMAIN,)DBHA1N 

$E5 ’ PUSH HL 

$3E,' — ' LD A,"-" 

$CD ' CALL PRINT 

<PRINT.)PRINT 

$11 ’ LD DE.DINBUF 

<DINBUF,>DINBUF 

$CD ’ CALL GETL 

<GETL.)GETL 

$CD ’ CALL SKPSP 

<SKPSP,>SKPSP 
$D8 ’ RET C 

$FE,ESC ’ CP ESC 

$C8 ’ RET 2 

$FE.’- 
$20 

DBHCNG-*-l 

~— ’ CALL SKPSPL 


’ JR NZ.DBHCNG 


$CD 

<SKPSPL.)SKPSPL 

$D8 ’ RET C 

$CD ’ CALL UPPER 

<UPPER.>UPPER 

$38 ’ JR C.DBERR 

DBERR---1 

$21 ’ LD HL.DCNDJT 

<DCMDJT,>DCHDJT 
$D6,'A ’ SUB "A" 

$17 ' RLA 

$4F ’ LD C,A 

$06,0 ' LD B.0 

$09 ’ ADD HL.BC 

$CD ’ CALL LDHLHL 


Edit contents of i 


imory 


DBNCNG FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 

DBNCN1 FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 


$CD ’ DBNCNGiCALL HLHEX 

<HLHEX,>HLHEX 
$38 ’ JR C.DBERR 

DBERR-*-l 

$CD ’ CALL SKPSP 

<SKPSP,>SKPSP 

$FE,’> ’CP ’)’ 

$20 ’ JR NZ.DBERR 

DBERR-*-l 

$13 ’ INC DE 

$CD ’ DBNCN1:CALL SKPSP 

<SKPSP,>SKPSP 

$D8 ’ RET C 

$FE,’: ’CP "t" 

$C8 ’ RET 2 

$CD ’ CALL AHEX 

<AHEX,>AHEX 

$38 ’ JR C.DBERR 

DBERR-'-l 

LD (HL),A 
INC HL 
JR DBNCN1 


$77 
$23 
$18 
DBNCN11 


* Debugger coaaand error trap 

DBNOP EQU * ’ DBNOP EQU $ 

DBERR FCB $11 ’ DBERR: l.D DE.DSNERN 

FCB <DSNERN.)DSNERM 
FCB $CD ’ CALL HSX 

FCB <HSX,>HSX 

FCB $18 ’ JR DBNAIN 

FCB DBNAIN-*—1 

* Break point set/re*et/view 

DBBRK FCB $2A ' DBBRK: LD HL,( DBRKPT) 

FCB <DBRKPT.>DBRKPT 

FCB $CD ’ CALL SKPSPL 

FCB <SKPSPL,>SKPSPL 
FCB $30 ’ JR NC.DBBRK3 

FCB DBBRK3—*—1 

DBBRK1 FCB $11 ’ DBBRK1:LD DE.DBRKVN 

FCB < DBRKVH.)DBRKVM 
FCB $CD ’ CALL NSX 

FCB <MSX.>MSX 


► =* > i + U fc ij'ti'b c, -r, 

nvutr -5 0^ Jo AIIIJ t I'SAt'-f X/ 

h lift $ io-ttc 


iftg ( 16 ) ABfclft 
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1672 1709 3A 

1673 170A 9E 

1674 170C B7 

1675 170D 20 

1676 170E 06 

1677 170F 11 

1678 1710 E2 

1679 1712 C3 

1680 1713 13 


FCB $3A • LD A,(DBRKF) 

FCB <DBRKF,>DBRKF 

FCB $B7 ' OR A 

FCB $20 ' JR NZ.DBBRK2 

FCB DBBRK2-*—1 

FCB $11 ' LD DE.DBRKNM 

FCB (DBRKNN, >DBRKNH 

FCB $C3 1 JP HSX 

FCB (HSX.)HSX 


1682 1715 
1603 1716 

1684 1718 

1685 1719 


CD 

E4 

C3 

C8 


DBBRK2 FCB 
FCB 
FCB 
FCB 


$CD ' DBBRK2:CALL PRTHL 

<PRTHL,>PRTHL 
$C3 ' JP LTNL 

<LTNL,>LTNL 


1687 171B 

1688 171D 

1689 171E 

1690 171F 

1691 1720 

1692 1722 

1693 1723 

1694 1724 

1695 1725 

1696 1727 

1697 1728 

1698 1729 

1699 172A 

1700 172C 

1701 172D 


FE 

20 

0F 

3A 

9E 

B7 

C8 

3A 

A1 

77 

AF 

32 

9E 

10 

D5 


FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 


FCB 

FCB 

FCB 


$FE,* * * DBBRK3 CP 

$20 ' JR NZ.DBBRK4 

DBBRK4---1 

$3A ’ LD A.(DBRKF) 

<DBRKF,>DBRKF 

$B7 1 OR A 

SCO ‘ RET Z 

$3A ' LD A.(DBRKOD) 

< DBRKOD.> DBRKOD 

$77 ' LD (HL).A 

$AF • XOR A 

$32 * LD (DBRKF),A 

<DBRKF,>DBRKF 

$18 ' JR DBBRK1 

DBBRK1-*—1 


1703 172E 

1704 172F 

1705 1730 

1706 1731 

1707 1733 

1708 1734 

1709 1735 

1710 1736 

1711 1738 

1712 1739 

1713 173A 

1714 173B 

1715 173C 

1716 173E 

1717 173F 

1718 1740 

1719 1741 

1720 1743 

1721 1745 

1722 1746 

1723 1747 

1724 1749 

1725 174A 

1726 174C 

1727 174D 

1728 

1729 

1730 

1731 174E 

1732 174F 

1733 1751 

1734 1752 

1735 1754 


4D 
CD 
73 
38 
BE 
3A 
9E 
B7 
28 
04 
3A 
A1 
02 
7E 
32 
A1 
3E 
77 
32 
9E 
22 
9F 
16 
B5 


FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

DBBRK5 FCB 
FCB 


FCB 

FCB 

FCB 



$44 ' DBBRK4:LD B.H 

$4D 1 LD C.L 

$CD 1 CALL HLHEX 

<HLHEX,>HLHEX 

$38 ’ JR C.DBERR 

DBERR-*-l 

$3A ' LD A,(DBRKF) 

(DBRKF,>DBRKF 

$B7 ' OR A 

$28 ' JR Z.DBBRK5 

DBBRK5-*-l 

$3A * LD A, (DBRKOD) 

<DBRKOD,>DBRKOD 

$02 ‘ LD (BC),A 

$7E * DBBRK5:LD A.(HL) 

$32 1 LD (DBRKOD),A 

<DBRKOD,>DBRKOD 

$3E,$FF 1 LD A.0FFH i RST 38H 

$77 * LD (HL),A 

$32 ' LD (DBRKF),A 

<DBRKF,>DBRKF 

$22 1 LD (DBRKPT).HL 

(DBRKPT,>DBRKPT 
$18 'JR DBBRK1 

DBBRK1-*—1 


Calc. HEX data 


CD 

58 

CD 

73 

38 


DBCAL FCB $CD 1 DBCAL: CALL SKPSPL 

FCB <SKPSPL.>SKPSPL 
FCB $CD 1 CALL HLHEX 

FCB <HLHEX,>HLHEX 
FCB $38 1 JR C.DBERR 


1736 1755 

1737 1756 

1738 1757 

1739 1759 

1740 175A 

1741 175B 

1742 175D 

1743 175E 

1744 175F 

1745 1760 

1746 1761 

1747 1762 

1748 1764 

1749 1765 

1750 1767 

1751 1768 

1752 1769 

1753 176A 

1754 176B 

1755 176C 

1756 176D 

1757 176F 

1758 1770 

1759 1771 

1760 1773 

1761 1774 

1762 1776 

1763 1777 

1764 1778 

1765 177A 

1766 177C 

1767 177D 

1768 177F 

1769 1781 

1770 1782 

1771 1784 

1772 1785 

1773 1786 

1774 1787 

1775 1789 

1776 178A 

1777 178C 

1778 178E 

1779 178F 

1780 1791 

1781 1792 

1782 1793 

1783 1795 

1784 1797 

1785 1798 

1786 179A 

1787 179B 

1788 179C 

1789 179E 

1790 179F 

1791 17A1 

1792 17A2 


1795 

1796 17A4 

1797 17A5 

1798 17A7 

1799 17A8 

1600 17AA 

1601 17AB 

1602 17AC 

1603 17AD 

1804 17AF 

1805 17B0 

1806 17B2 

1607 17B3 

1608 17B5 

1609 17B6 

1810 17B8 

1811 17B9 

1812 17BB 

1813 17BC 

1814 17BD 

1815 17BF 

1816 17C0 

1817 17C2 
1618 17C3 


9D 

CD 

SC 

36 

96 

FE 

20 

94 

44 

4D 

CD 

5B 

CD 

73 

38 

BA 

50 

59 

EB 

CD 

E4 

E5 

DS 

3E 

CD 

F5 

EB 

CD 

E4 

3E 

CD 

F5 

0019 

CD 

E4 

D1 

El 

CD 

ce 

CD 

E4 

3E 

CD 

F5 

EB 

CD 

E4 

3E 

CD 

F5 

EB 

B7 

ED52 

CD 

E4 

C3 

C8 


FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FDB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 


FCB 

FCB 

FCB 

FCB 

FDB 

FCB 

FCB 

FCB 

FCB 


DBERR-'-l 

$CD * CALL SKPSP 

(SKPSP,>SKPSP 

$38 * JR C.DBERR 

DBERR-*-l 

$FE,’. 'CP 

$20 ' JR NZ.DBERR 

DBERR-*-l 

$44 ' LD B.H 

$4D ' LD C.L 

$CD * CALL SKPSPL 

(SKPSPL,>SKPSPL 

$CD ' CALL HLHEX 

<HLHEX,>HLHEX 

$38 ' JR C.DBERR 

DBERR-’-l 

$50 ' LD D.B 

$59 ' LD E.C 

$EB ' EX DE.HL 

$CD ' CALL PRTHL 

<PRTHL.>PRTHL 
$E5 ' PUSH HL 

$D5 ' PUSH DE 

$3E,'♦ ' LD A, 

$CD ' CALL PRINT 

< PRINT.> PRINT 

$EB ' EX DE.HL 

$CD ' CALL PRTHL 

<PRTHL,>PRTHL 
$3E,' LD A,'*' 

$CD ' CALL PRINT 

<PRINT,> PRINT 
$19 ' ADD HL.DE 

$CD ' CALL PRTHL 

<PRTHL.>PRTHL 
$D1 ' POP DE 

$E1 ' POP HL 

$CD ' CALL LTNL 

<LTNL.>LTNL 

$CD * CALL PRTHL 

<PRTHL.>PRTHL 
$3E.' LD A,’-" 

$CD * CALL PRINT 

< PRINT,> PRINT 

$EB • EX DE.HL 

$CD ' CALL PRTHL 

<PRTHL.>PRTHL 
$3E,*» ' LD A."»" 

$CD ' CALL PRINT 

<PRINT,>PR INT 
$EB • EX DE.HL 

$B7 ’ OR A 

$ED52 ' SBC HL.DE 

$CD * CALL PRTHL 

<PRTHL.>PRTHL 
$C3 ' JP LTNL 

<LTNL.>LTNL 


Duop contents of neaory 


2A 

9A 

CD 

5B 

38 

09 

CD 

73 

DA 

F3 

22 

9A 

24 

2E 

CD 

5C 

36 

12 

FE 

C2 

F3 

CD 

5B 


DBDHP FCB 
FCB 


FCB 

FCB 

FCB 

FCB 

FCB 


FCB 

FCB 

DBDHP1 FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 


$2A ' DBDHPs LD HL,(DCRADR) 

< DCRADR,> DCRADR 

$CD ' CALL SKPSPL 

<SKPSPL,>SKPSPL 

$38 ' JR C.DBDMP1 

DBDMPl-*-l 

$CD ' CALL HLHEX 

<HLHEX.>HLHEX 
$DA ' JP C.DBERR 

(DBERR.>DBERR 

$22 ' LD (DCRADR).HL 

<DCRADR.)DCRADR 

$24 ' DBDHP2:INC H 

$2E,0 ' LD L.0 

$CD ' CALL SKPSP 

<SKPSP.)SKPSP 

$38 ' JR C.DBDHP2 

DBDMP2-*—1 

$FE.'. 'CP 

$C2 ' JP NZ.DBERR 

<DBERR.)DBERR 

$CD ' CALL SKPSPL 

<SKPSPL,>SKPSPL 


1819 17C5 

1820 17C6 

1821 17C8 

1822 17C9 

1823 17CB 

1824 17CC 

1825 17CE 

1826 17CF 

1827 17D1 

1828 17D2 

1829 17D3 

1830 17D4 

1831 17D6 
1032 17D7 

1833 17D9 

1834 17DB 

1835 17DC 
1036 17DD 

1837 17DE 

1838 17E0 

1839 17E1 

1840 17E3 

1841 17E4 

1842 17E6 

1843 17E7 

1844 17E9 

1845 17EA 

1846 17EC 

1847 17ED 

1848 17EF 

1849 17F0 

1850 17F1 

1851 17F2 

1852 17F3 

1853 17F4 

1854 17F5 

1855 17F7 

1856 17F8 

1857 17FA 

1858 17FB 

1859 17FC 

1860 17FD 

1861 17FF 

1862 1000 

1863 1802 

1864 1803 

1865 1B04 

1866 1B06 

1867 1B07 

1868 1009 

1869 180A 

1870 180C 


CD 

73 

DA 

F3 

11 

1000 

19 

3E 

A5 

6F 

22 

9C 

2A 

9A 

3E 

A5 

6F 

11 

E8 

CD 

13 

01 

0010 

CD 

E4 

11 

38 

CD 

13 

7E 

81 

4F 

7E 

23 

CD 


FCB 

FCB 

FCB 

FCB 

FDB 

FCB 

DBDHP2 FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 

DBDMP3 FCB 
FCB 
FCB 

DBDMP4 FCB 
FDB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 

DBDHP5 FCB 
FCB 
FCB 
FCB 
FCB 


E9 

CD 

DF 

10 

F3 

11 

3C 

CD 

13 

79 

CD 

E9 


CD 

13 

11 


FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 


$CD ' CALL HLHEX 

(HLHEX,>HLHEX 

$DA ' JP C.DBERR 

(DBERR.)DBERR 

$11 ' LD DE.0010H 

$1000 

$19 ' ADD HL.DE 

$3E,*11110000 ' DBDMP2: LD A.11110000B 

$A5 ' AND L 

$6F ' LD L.A 

$22 ' LD (DEDADR).HL 

< DEDADR,> DEDADR 

$2A ' LD HL,(DCRADR) 

(DCRADR,)DCRADR 

$3E,$11110000 ' LD A,11110000B 

$A5 ' AND L 

$6F ' LD L.A 

$11 ' DBDMP3:LD DE.DDMPLM 

< DDHPLM.> DDMPLH 

$CD ' CALL HSX 

(MSX.)HSX 

$01 ' DBDHP4:LD BC.1000H 

$0010 

SCD ' CALL PRTHL 

(PRTHL.)PRTHL 

$11 ' LD DE.DDMP1H 

(DDHPIH.)DDMPIH 

SCD ' CALL HSX 

(HSX.)HSX 

S7E ’ DBDHP5:LD A.(HL) 

$81 ' ADD A.C 

$4F ' LD C.A 

$7E ' LD A,(HL) 

$23 ' INC HL 

SCD ' CALL PRTHX 

< PRTHX,> PRTHX 

SCD ' CALL PRNTS 

(PRNTS.)PRNTS 
$10 ' DJNZ DBDMP5 

DBDHP5-*—1 

$11 ' LD DE.DDHP2H 

< DDHP2H,> DDH P2H 

SCD ' CALL HSX 

<HSX,)HSX 

S79 ' LD A.C 

SCD ' CALL PRTHX 

(PRTHX.)PRTHX 
$11 ' LD DE.DDHP3H 

< DDHP3H,> DDHP3H 

SCD ' CALL HSX 

<HSX,>MSX 

$11 ' LD DE,—16 


1871 180D 

1872 180F 

1873 1810 

1874 1812 

1875 1813 

1876 1815 

1877 1816 

1878 1817 

1879 1819 

1880 181A 

1881 181C 

1882 181D 

1883 161E 

1884 181F 

1885 1820 

1886 1622 
1887 1823 
1886 1825 
1089 1826 

1890 1628 

1891 1829 

1892 182B 

1893 182D 

1894 182E 

1895 1830 

1896 1631 

1897 1832 

1898 1633 

1899 1834 

1900 1835 

1901 1836 

1902 1837 

1903 1839 

1904 183A 

1905 

1906 

1907 

1908 183B 

1909 183C 

1910 183E 

1911 183F 

1912 1841 

1913 1842 

1914 1644 

1915 1845 

1916 1847 

1917 1849 

1918 184A 

1919 184C 

1920 164D 

1921 184E 

1922 184F 

1923 1851 

1924 1852 

1925 1854 

1926 1855 

1927 1857 

1928 1858 

1929 185A 

1930 185C 

1931 185D 

1932 185F 

1933 1860 

1934 1862 

1935 1863 

1936 1865 

1937 1866 

1938 1868 

1939 1869 

1940 186A 

1941 186B 

1942 186C 

1943 186E 

1944 186F 

1945 1870 

1946 1871 

1947 

1948 

1949 

1950 1872 

1951 1873 

1952 1875 

1953 1876 

1954 1877 

1955 1878 

1956 187A 

1957 187B 

1958 187D 

1959 187E 

1960 1880 

1961 1882 

1962 1883 

1963 1884 

1964 1885 

1965 1806 


FCB 

FCB 

FCB 

DBDHP6 FCB 
FCB 
FCB 
FCB 
FCB 

DBDHP7 FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 


FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 


DBFIL FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 


FCB 

FCB 

FCB 

FCB 


DBDHP7:CALL PRINT 


<$FFF0,>$FFF0 
S19 ' ADD HL.DE 

$06,16 ' LD B, 16 

$7E ' DBDHP6.-LD A.(HL) 

SFE,' +1 ' CP " "+J 

$30 ' JR NC.DBDHP7 

DBDHP7-*-l 
$3E, ' 

SCD 

(PRINT.>PRINT 
$23 ' INC HL 

$10 ' DJNZ DBDHP6 

DBDMP6---1 

SCD ' CALL LTNL 

(LTNL.)LTNL 

$22 ' LD (DCRADR),HL 

(DCRADR,>DCRADR 
SCD ' CALL BRKEY 

(BRKEY.)BRKEY 
SCO ' RET Z 

SED5B ' LD DE.(DEDADR) 

(DEDADR.)DEDADR 


OR A 

SBC HL.DE 
ADD HL.DE 
RET 2 
LD A, L 
OR A 

JR NZ.DBDHP4 


DBFIL: CALL SKPSPL 


$B7 
SED52 
$19 
$CB 
$7D 
$B7 
$20 

DBDMP4-*—1 

(LTNL.)LTNL 

$18 

DBDHP3-*—1 


$CD 

(SKPSPL.>SKPSPL 
SCD ’ CALL HLHEX 

(HLHEX.)HLHEX 
$DA ' JP C.DBERR 

(DBERR.)DBERR 
SCD ' CALL SKPSP 

(SKPSP.>SKPSP 
SFE.'. 'CP 

$C2 ' JP NZ.DBERR 

(DBERR.)DBERR 
$44 ' LD B.H 

$4D ' LD C.L 

SCD ' CALL SKPSPL 

(SKPSPL.>SKPSPL 
SCD ' CALL HLHEX 

(HLHEX.)HLHEX 
$DA ' JP C.DBERR 

(DBERR.)DBERR 
SCD ' CALL SKPSP 

(SKPSP.>SKPSP 
$FE,'. 'CP 

$C2 ' JP NZ.DBERR 

(DBERR.)DBERR 
SCD ' CALL SKPSPL 

(SKPSPL,>SKPSPL 
SCD ' CALL AHEX 

(AHEX.)AHEX 

$DA ' JP C.DBERR 

(DBERR.)DBERR 


$23 

$02 

$03 

$B7 

SED42 

$09 

$20 

DBFILI- 
$C9 


INC HL 

DBFIL1:LD (BC).A 
INC BC 
OR A 

SBC HL, BC 
ADD HL.BC 
JR NZ.DBFILI 

RET 


Go object prograa 


CD 

5B 

38 

0E 

CD 

73 

DA 

F3 

EB 

002A 

96 

73 

23 

72 

31 

00 


FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 


FCB 

FCB 

FCB 

FCB 

FCB 


SCD ' DBGO: CALL SKPSPL 

(SKPSPL.>SKPSPL 
$38 ' JR C.DBGOl 

DBG01-*-l 

SCD ' CALL HLHEX 

(HLHEX.>HLHEX 

$DA ' JP C.DBERR 

(DBERR.)DBERR 

$EB ' EX DE.HL 

$2A ' LD HL,(DORSTK) 

(DORSTK.)DORSTK 

$73 ' LD (HL).E 

$23 ' INC HL 

$72 ' LD (HL),D 

$31 ' DBGOl: LD SP.DBSTK 

(DBSTK.)DBSTK 
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HE SENTINEL 


1966 1666 

1967 1889 

1968 188A 

1969 188B 
197® I860 

1971 188D 

1972 188E 

1973 188F 

1974 1890 

1975 1891 

1976 1892 

1977 1893 

1978 1894 

1979 1896 

1980 1898 

1981 1B9A 

1982 189C 
1963 1890 

1984 189E 

1985 189F 

1986 18A0 

1987 

1988 

1989 

1990 18A1 

1991 16A2 

1992 18A4 

1993 16A5 

1994 

1995 

1996 

1997 16A7 

1998 16A8 

1999 16AA 

2000 18AB 

2001 i860 

2002 18AE 

2003 18B0 

2004 18B1 

2005 18B3 

2006 16B5 

2007 18B6 

2008 18B8 

2009 18B9 

2010 18BA 

2011 16BB 

2012 1 ABC 

2013 18BD 

2014 16BE 

2015 18BF 

2016 

2017 

2018 

2019 10C0 

2020 16C1 

2021 16C3 

2022 16C4 

2023 10C6 

2024 18C7 

2025 16C9 

2026 16CA 

2027 

2028 

2029 

2030 10CB 

2031 16CC 

2032 16CE 

2033 18CF 

2034 18D1 

2035 1602 

2036 16D3 

2037 16D4 

2038 1606 

2039 18D7 

2040 1809 

2041 18DA 

2042 18DC 

2043 18DE 

2044 16DF 

2045 18E1 

2046 16E2 

2047 16E3 

2048 18E5 

2049 18E7 

2050 16E8 

2051 16EA 

2052 16EB 

2053 18ED 

2054 16EE 

2055 16F0 

2056 18F1 

2057 18F2 

2058 18F3 

2059 16F4 

2060 18F6 

2061 18F7 

2062 18F8 

2063 18FA 

2064 18FB 

2065 16FD 

2066 18FE 

2067 1900 

2068 1901 

2069 1903 

2070 1904 

2071 1906 

2072 1907 

2073 1908 

2074 1909 

2075 190A 

2076 190C 

2077 190D 

2078 190F 

2079 1910 

2080 1912 

2081 1913 

2082 1914 

2083 1915 

2084 1917 

2085 1918 

2086 191A 

2087 191B 

2088 191C 

2089 191D 

2090 

2091 

2092 

2093 191E 

2094 191F 

2095 1921 

2096 1922 

2097 1923 

2098 1924 

2099 1925 

2100 1926 

2101 1927 

2102 1929 

2103 192A 

2104 192C 

2105 192D 

2106 192E 

2107 192F 

2108 1930 

2109 1932 

2110 1933 

2111 
2112 


DDE5 

FDE5 

ED7B 


FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FDB 

FDB 

FDB 

FCB 

FCB 

FCB 

FCB 

FCB 


DBHLP FCB 
FCB 
FCB 
FCB 


$C1 

$01 

$E1 

$08 

$D9 

$F1 

$C1 

$01 

$E1 

$08 

$D9 

$DDE5 

$FDE5 

SED7B 


<DORSTK.>DORSTK 


POP AF 
POP BC 
POP DE 
POP HL 
EX AF,AF' 

EXX 

POP AF 
POP BC 
POP DE 
POP HL 
EX AF,AF' 

EXX 

POP IX 
POP IY 

LD SP,(DORSTK) 


$E3 

$2B 

$E3 

$FB 

$C9 


<DHLPM, >DHLPM 
$C3 ' JP USX 

<MSX.>MSX 


EX (SP).HL 
DEC HL 
EX (SP).HL 


DBHLP: LD DE.DHLPM 


Insert string 


FCB 

FCB 

FCB 


FCB 

FCB 

FCB 

FCB 

DBINS1 FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 


FCB 

FCB 

FCB 

FCB 

FCB 


$CD ' DBSIN: CALL SKPSPL 

<SKPSPL.>SKPSPL 
$CD ' CALL HLHEX 

<HLHEX,>HLHEX 
$DA ' JP C.DBERR 

<DBERR,>DBERR 
$CD ' CALL SKPSP 

<SKPSP,>SKPSP 
$FE,', 'CP 

$C2 ' JP NZ.DBERR 

<DBERR,>DBERR 


SCO 

$77 

$23 

$18 

DBINS1-*- 


DBINS1:INC DE 
LD A,(DE) 

OR A 
RET Z 
LD (HL).A 
INC HL 
JR DBINS1 


$CD ' DBJMP: CALL SKPSPL 

<SKPSPL,>SKPSPL 
$CD ' CALL HLHEX 

<HLHEX,>HLHEX 
$DA ' JP C.DBERR 

<DBERR,>DBERR 


$E9 


El 

JP (HL) 


Meaory change 


DBMEM FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 

DBMEMI FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 


FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

DBMEM2 FCB 
FCB 
FCB 


$2A ' DBMEM: LD HL,(DCRADR) 

< DCRADR,> DCRADR 

$CD ' CALL SKPSPL 

<SKPSPL,>SKPSPL 
$38 ' JR C.DBMEM1 

DBMEM1-*—1 

$CD ' CALL HLHEX 

<HLHEX,>HLHEX 
$DA ' JP C.DBERR 

<DBERR,>DBERR 

$CD ' DBMEM1:CALL PRTHL 

<PRTHL,>PRTHL 

$3E,': ' LD A.":" 

$CD ' CALL PRINT 

<PRINT,>PRINT 

$7E ' LD A,(HL) 

$CD ' CALL PRTHX 

< PRTHX,> PRTHX 

$3E,'- ' LD A."-" 

$CD ' CALL PRINT 

< PRINT,> PRINT 

$11 ' LD DE.DINBUF 

<DINBUF.>DINBUF 
$CD ' CALL GETL 

<GETL,>GETL 

$1A ' LD A,(DE) 

$B7 ' OR A 

$28 ’ JR Z.DBMEM2 

DBMEM2-*-l 

$FE,ESC ' CP ESC 

$C8 ’ RET Z 

$CD ' CALL SKPSP 

<SKPSP,>SKPSP 

$CD ' CALL HLHEX 

<HLHEX.>HLHEX 

$DA ' JP C.DBERR 

<DBERR,>DBERR 

$1A ' LD A,(DE) 

$FE,': 'CP 

SC2 ' JP NZ.DBERR 

<DBERR,> DBERR 


$13 
$13 
$13 
$1A 

$FE,'- 
$C2 


INC DE 
INC DE 
INC DE 
LD A.(DE) 
CP 


JP NZ.DBERR 

<DBERR,>DBERR 

$CD ' CALL SKPSPL 

<SKPSPL,>SKPSPL 

$38 ' JR C.DBMEM2 

DBMEM2-*—1 

$CD ' CALL AHEX 

<AHEX,>AHEX 


$DA 
<DBERR.>DBI 
$77 
$23 
$18 

DBMEMl-'-l 


* JP C.DBERR 

• LD (HL),A 

* DBMEM2:INC HL 

• JR DBMEM1 


Printer switch on/off 


DBPRT FCB 
FCB 
FCB 
FCB 
FCB 
FCB 

DBPRT1 FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 

DBPRT2 FCB 
FCB 


$3A ’ DBPRT: LD A.( LPSW) 

< LPSW,> LPSW 

$B7 ' OR A 

$20 ' JR NZ.DBPRT1 

DBPRTl-*-l 

$3E ' DB 3EH i LD A.nn 

$AF * DBPRT1:XOR A 

$32 ' LD < LPSW).A 

< LPSW.) LPSW 

$Tl ' LD DE.DPRTNM 

<DPRTNM.>DPRTNM 

$B7 ’ OR A 

$20 ' JR NZ.DBPRT2 

DBPRT2-*—1 

$11 ' LD DE.DPRTFM 

< DPRTFM,> DPRTFM 

$C3 * DBPRT2:JP MSX 

<MSX,>MSX 


Quit debugger 


2113 

2114 1935 C3 

2115 1936 29 

2116 

2117 

2118 

2119 1938 21 

2120 1939 00 

2121 193B CD 

2122 193C 5B 

2123 193E 30 

2124 193F 2A 

2125 1940 11 

2126 1941 E3 

2127 1943 CD 

2128 1944 13 

2129 1946 06 

2130 1948 E5 

2131 1949 CD 

2132 194A 6E 

2133 194C CD 

2134 194D E4 

2135 194F El 

2136 1950 CD 

2137 1951 DF 

2138 1953 23 

2139 1954 23 

2140 1955 10 

2141 1956 FI 

2142 1957 2A 

2143 1958 96 

2144 195A CD 

2145 195B E4 

2146 195D CD 

2147 195E DF 

2148 1960 CD 

2149 1961 6E 

2150 1963 2B 

2151 1964 CD 

2152 1965 E4 

2153 1967 C3 

2154 1968 C8 


DBQIT FCB $C3 ’ DBQIT: JP COLD 

FCB <COLD,>COLD 

* Diplay/Change contents of register 


DBREG FCB $21 ’ DBREG: LD HL.DBSTK 

FCB <DBSTK,>DBSTK 
FCB $CD ' CALL SKPSPL 

FCB <SKPSPL,>SKPSPL 
FCB $30 ' JR NC.DBREG2 

FCB DBREG2-*-l 

FCB $11 ' LD DE.DREGM 

FCB <DREGM,>DREGM 
FCB $CD ’ CALL MSX 

FCB <MSX.>MSX 

FCB $06.10 * LD B,10 

DBREG1 FCB $E5 * DBREG1:PUSH HL 

FCB $CD ' CALL LDHLHL 

FCB <LDHLHL.)LDHLHL 
FCB $CD ’ CALL PRTHL 


FCB <PRTHL.)PRTHL 
FCB $E1 1 POP HL 

FCB $CD * CALL PRNTS 

FCB <PRNTS.)PRNTS 
FCB $23 ' INC HL 

FCB $23 ' INC HL 

FCB $10 ' DJN2 DBREG1 

FCB DBREG1---l 

FCB $2A ' LD HL.<DORSTK) 

FCB <DORSTK.)DORSTK 

FCB $CD ' CALL PRTHL 

FCB <PRTHL.)PRTHL 

FCB $CD ’ CALL PRNTS 

FCB < PRNTS.> PRNTS 

FCB $CD ' CALL LDHLHL 

FCB <LDHLHL.)LDHLHL 

FCB $2B ' DEC HL 

FCB $CD ' CALL PRTHL 

FCB <PRTHL.)PRTHL 

FCB $C3 ’ JP LTNL 

FCB <LTNL,)LTNL 


2156 196A 

2157 196C 

2158 196D 

2159 196F 

2160 1971 

2161 1972 

2162 1974 

2163 1975 

2164 1976 

2165 1977 

2166 1979 

2167 197A 

2168 197C 

2169 197D 

2170 197E 

2171 197F 

2172 1980 

2173 1981 

2174 1982 

2175 1983 

2176 1984 

2177 1985 

2178 1986 

2179 1988 

2180 1989 

2181 198A 

2182 198C 

2183 198D 

2184 198F 

2185 1990 

2186 1992 

2187 

2188 

2189 

2190 1993 

2191 1994 

2192 1996 

2193 1997 

2194 1999 

2195 199A 

2196 199C 

2197 199D 
2196 199E 

2199 199F 

2200 19A1 

2201 19A3 

2202 19A4 

2203 19A6 

2204 19A7 

2205 19A9 

2206 19AA 

2207 19AC 

2208 19AD 

2209 19AF 

2210 19B0 

2211 19B2 

2212 19B4 

2213 19B5 

2214 19B7 

2215 19B8 

2216 19BA 

2217 19BB 

2218 19BD 

2219 19BE 

2220 19C0 

2221 19C1 

2222 19C2 

2223 19C3 

2224 19C4 

2225 19C5 

2226 19C6 

2227 19C7 

2228 19C8 

2229 19C9 

2230 19CB 

2231 19CC 

2232 19CE 

2233 19CF 

2234 19D0 

2235 19D1 

2236 19D3 

2237 19D4 

2238 19D5 

2239 19D6 

2240 19D8 

2241 19D9 

2242 19DA 

2243 19DB 

2244 19DC 

2245 

2246 

2247 

2248 19DE 

2249 19DF 

2250 19E1 

2251 19E2 

2252 19E4 

2253 19E5 

2254 19E7 

2255 19E8 

2256 19EA 

2257 19EC 

2258 19ED 

2259 19EF 


DBREG2 FCB 
FCB 
FCB 
FCB 

DBREG3 FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 


$CD ' DBREG3:CALL SKPSPL 

<SKPSPL,>SKPSPL 

$DB ' RET C 

$E5 ' PUSH HL 

$CD ' CALL HLHEX 

<HLHEX.)HLHEX 

$DA ' JP C.DBERR 

<DBERR.)DBERR 

$4D ' LD C.L 

$7C ' LD A.H 

$E1 ' POP HL 

$71 ' LD <HL),C 

$23 ' INC HL 

$77 ' LD (HL).A 

$23 ' INC HL 

$10 ' DJNZ DBREG3 

DBREG3-*-l 

$CD ' CALL SKPSPL 

<SKPSPL,>SKPSPL 

$D8 ' RET C 

$CD ' CALL HLHEX 

<HLHEX.)HLHEX 

$DA ' JP C.DBERR 

<DBERR.)DBERR 

$22 ' LD (DORSTK).HL 

<DORSTK.)DORSTK 
$C9 ' RET 


FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

DBSEA1 FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 

DBSEA2 FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FDB 
FCB 
FCB 
FCB 

DBSEA3 FCB 
FCB 


$CD ' DBSEA: CALL SKPSPL 

<SKPSPL,>SKPSPL 

$CD ' CALL HLHEX 

<HLHEX.)HLHEX 

$DA ' JP C.DBERR 

<DBERR.)DBERR 

$44 ' LD B.H 

$4D ' LD C.L 

$CD ' CALL SKPSP 

<SKPSP,>SKPSP 

$FE.’, ' CP 

$C2 ' JP NZ.DBERR 

<DBERR.)DBERR 

$CD ' CALL SKPSPL 

<SKPSPL,>SKPSPL 

$CD ' CALL HLHEX 

<HLHEX,>HLHEX 

$DA ’ JP C.DBERR 


$CD ' CALL SKPSP 

<SKPSP,>SKPSP 

$FE,'. 'CP 

$C2 ' JP NZ.DBERR 

<DBERR,)DBERR 

$CD ' CALL SKPSPL 

<SKPSPL.>SKPSPL 

$CD ' CALL AHEX 

<AHEX.)AHEX 

$DA ' JP C.DBERR 

<DBERR.)DBERR 


LD D.B 
LD E.C 
EX DE.HL 
INC DE 

DBSEA1:CP (HL) 
JR NZ.DBSEA2 


$50 
$59 
$EB 
$13 
$BE 
$20 

DBSEA2-*- 
$08 ' EX AF.AF* 

$CD ' CALL PRTHL 

<PRTHL.)PRTHL 

$CD ' CALL PRNTS 

<PRNTS.)PRNTS 

$08 ' EX AF.AF' 

$23 ' DBSEA2:INC HL 

$CD ’ CALL BRKEY 

<BRKEY,>BRKEY 
$28 ' JR Z.DBSEA3 

DBSEA3-*-! 


$B7 
$ED52 
$19 
$20 

DBSEA1-*—1 
$C3 

<LTNL,)LTNL 


OR A 

SBC HL.DE 
ADD HL.DE 
JR NZ,DBSEA1 

DBSEA3:JP LTNL 


CD 

5B 

CD 

73 

DA 

F3 

CD 

5C 

FE 

C2 

F3 

22 


DBTRF FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 


$CD ' DBTRF: CALL SKPSPL 

<SKPSPL,>SKPSPL 

$CD ' CALL HLHEX 

<HLHEX,>HLHEX 

$DA ' JP C.DBERR 

<DBERR.)DBERR 

$CD ' CALL SKPSP 

<SKPSP,>SKPSP 

$FE,'. 'CP 

$C2 ’ JP NZ.DBERR 

<DBERR.>DBERR 

$22 ' LD (DCRADR).HL 
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2260 19F0 9A 

2261 19F2 CD 

2262 19F3 5B 

2263 19F5 CD 

2264 19F6 73 

2265 19F8 DA 

2266 19F9 F3 

2267 19FD CD 

2268 19FC 5C 

2269 19FE FE 

2270 1A00 C2 

2271 1A01 F3 

2272 1A03 22 

2273 1A04 9C 

2274 1A06 CD 

2275 1A07 5B 

2276 1A09 CD 

2277 1A0A 73 

2278 1A0C DA 

2279 1A0D F3 

2280 1A0F ED5B 

2281 1A11 9C 

2282 1A13 13 

2283 1A14 B7 

2284 1A15 ED52 

2285 1A17 19 

2286 1A18 30 

2287 1A19 23 

2288 1A1A ED5B 

2289 1A1C 9A 

2290 1A1E B7 

2291 1A1F ED52 

2292 1A21 19 

2293 1A22 C8 

2294 1A23 38 

2295 1A24 18 

2296 1A25 EB 

2297 1A26 2A 

2298 1A27 9C 

2299 1A29 ED4B 

2300 1A2B 9A 

2301 1A2D B7 

2302 1A2E ED42 

2303 1A30 44 

2304 IA31 4D 

2305 1A32 62 

2306 1A33 6B 

2307 1A34 09 

2308 1A35 EB 

2309 1A36 2A 

2310 1A37 9C 

2311 1A39 03 

2312 1A3A EDB8 

2313 1A3C C9 


FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FDB 

FCB 

FCB 

FCB 


FCB 

FCB 

FDB 

FCB 


FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FDB 

FCB 

FCB 

FDB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 


FCB 

FDB 

FCB 


< DCRADR.)DCRADR 

SCD 1 CALL SKPSPL 

<SKPSPL.>SKPSPL 

SCD • CALL HLHEX 

<HLHEX,>HLHEX 

SDA ’ JP C.DBERR 

<DBERR,>DBERR 

SCD ' CALL SKPSP 

<SKPSP,>SKPSP 

SFE.'. ’ CP 

$C2 1 JP C.DBERR 

<DBERR.>DBERR 

$22 ’ LD (DEDADR).ML 

<DEDADR.>DEDADR 

SCD 1 CALL SKPSPL 

<SKPSPL,>SKPSPL 

SCD • CALL HLHEX 

<HLHEX.>HLHEX 

SDA 1 JP C.DBERR 

<DBERR,>DBERR 

SED5B ' LD DE.(DEDADR) 

<DEDADR.>DEDADR 


$13 
$B7 
SED52 
S19 
$30 

DBTRF1-*-l 


INC DE 
OR A 

SBC HL.DE 
ADD HL.DE 
JR NC.DBTRF1 


LD DE.(DCRADR) 
<DCRADR.)DCRADR 
SB7 * OR A 

SED52 * SBC HL.DE 

$19 ' ADD HL.DE 

$C8 ’ RET Z 

$38 ’ JR C.DBTRF1 

DBTRFl-'-l 


$EB 1 EX DE.HL 

$2A * LD HL,(DEDADR) 

<DEDADR.>DEDADR 

SED4B ' LD BC.<DCRADR) 

<DCRADR.)DCRADR 

$B7 1 OR A 

SED42 ' SBC HL.BC 

$44 ' LD B.H 

$4D • LD C.L 

$62 • LD H.D 

$6B * LD L.E 

$09 ’ ADD HL.BC 

$EB • EX DE.HL 

$2A • LD HL,(DEDADR) 

<DEDADR,)DEDADR 

$03 ' INC BC 

$EDB8 1 LDDR 

$C9 * RET 


2315 1A3D 

2316 1A3E 

2317 1A3F 

2318 1A40 

2319 1A42 

2320 1A44 

2321 1A46 

2322 1A47 

2323 1A49 

2324 1A4A 

2325 1A4B 

2326 1A4C 

2327 1A4E 

2328 1A4F 

2329 1A51 


54 DBTRF1 FCB 

5D FCB 

2A FCB 

9C FCB 

ED4B FDB 

9A FCB 

B7 FCB 

ED42 FDB 

44 FCB 

4D FCB 

2A FCB 

9A FCB 

03 FCB 

EDB0 FDB 

C9 FCB 


$54 ‘ DBTRF1:LD D.H 

$SD ’ LD E.L 

$2A 1 LD HL.<DEDADR) 

<DEDADR,>DEDADR 

$ED4B ' LD BC.(DCRADR) 

<DCRADR.)DCRADR 

$B7 ’ OR A 

$ED42 • SBC HL.BC 

$44 ’ LD B.H 

$4D ' LD C.L 

$2A 1 LD HL.(DCRADR) 

<DCRADR.)DCRADR 

$03 1 INC BC 

$EDB0 ' LDIR 

$C9 1 RET 


2331 


1A52 ENDDEB EQU 


2333 

2334 * End of Z-80 debugger Module 

2335 * 


2338 

2339 

2340 

2341 

2342 

2343 

2344 1A52 

2345 

2346 

2348 1B00 

2349 1B01 

2350 1B03 

2351 1B04 

2352 1B06 

2353 1B07 

2354 1B09 

2355 1B0A 

2356 1B0C 

2357 1B0D 

2358 1B0F 

2359 1B10 

2360 1B12 

2361 1B13 

2362 IBIS 

2363 1B16 

2364 1B18 

2365 1B19 

2366 

2367 

2368 

2369 1B1B 

2370 


2373 1B1C 

2374 IBID 

2375 1B1F 

2376 1B20 

2377 1B22 

2378 1B24 

2379 1B25 

2380 1B26 

2381 

2382 

2383 

2384 1B27 

2385 

2386 

2387 

2388 1B29 

2389 1B2A 

2390 1B2C 

2391 1B2D 

2392 1B2F 

2393 1B31 

2394 1B32 

2395 1B34 

2396 1B36 

2397 1B38 

2398 1B39 

2399 1B3B 

2400 1B3D 

2401 1B3F 

2402 1B41 

2403 1B43 

2404 1B45 

2405 1B46 

2406 1B48 


• +++ Z-80 systea Module ♦++ 

• Designed by Y.Morishita 

• Coded by Y.NorIshite 

00AE RUB $1B00-* 

• Restart hook 


C3 

29 

C3 

0C 

C3 

IB 

C3 

IB 

C3 

IB 

C3 

IB 

C3 

IB 

C3 

1C 

C3 

IB 


ZHK00H FCB 
FCB 

ZHK08H FCB 
FCB 

ZHK10H FCB 
FCB 

ZHK18H FCB 
FCB 

ZHK20H FCB 
FCB 

ZHK28H FCB 
FCB 

ZHK30H FCB 
FCB 

ZHK38H FCB 
FCB 

ZHK66H FCB 
FCB 


$C3 1 ZHK00H:JP COLD i Cold star 

<COLD,)COLD 

$C3 1 ZHK08H:JP CMDGO i CMD handl 

{CMDGO.)CMDGO 

$C3 1 ZHK10H:JP RSTDMY : Duaay 

<RSTDNY,>RSTDHY 

$C3 * ZHK16H:JP RSTDMY i Duaay 

<RSTDMY,>RSTDMY 

$C3 • ZHK20H:JP RSTDMY ; Duaay 

<RSTDMY,>RSTDMY 

$C3 1 ZHK28H:JP RSTDMY j Duaay 

{RSTDMY,>RSTDMY 

$C3 ’ ZHK30H:JP RSTDMY j Duaay 

{RSTDMY,>RSTDMY 

$C3 ’ ZHK38H:JP RST38H i Break 

{RST38H,>RST38H 

$C3 ' ZHK66H:JP RSTDMY ; Duaay 

{RSTDMY,>RSTDMY 


Restart duaay GAP 


C9 RSTDMY FCB $C9 


RSTDMY;RET 


RST 38H GAP 


RST38H FCB $F5 


RST38H:PUSH AF 


$ED57 ' LD A.I 

FCB SEA ' JP PE.DBBENT 

FCB <DBBENT,)DBBENT 
FCB $CF,0 
FCB $F1 
FCB $FB 
FCB $C9 


• NMI duaay GAP 
ED45 NMIDMY FDB $ED45 

* - Cold start - 


NMIDMY;RETN 


F3 

ED56 

31 

00 

3E 

CD 

AA 

3E 

CF 

21 

BC 

CF 

3E 

CF 

3E 

CF 

21 

96 

0b 


COLD FCB 


FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 


$F3 1 COLD: DI 

SED56 ’ IM 1 

$31 1 LD SP.Z80STK 

{Z80STK,>Z80STK 
$3E,80 ’ LD A.80 

SCD ’ CALL WIDCH 

{WIDCH,>KIDCH 

$3E.*00111111 1 LD A.0011111IB 

$CF,2 • SWORD SSCNSCTL 

$21 ' LD HL.TABMAP 

{TABMAP.>TABMAP 

$CF,3 * SWORD SSTABSET 

$3E,7 • LD A.7 

$CF,4 ’ SWORD SSSETATR 

S3E.S44 • LD A.44H 

SCF.5 1 SWORD S$MPCTL 

$21 • LD HL.CPMAP 

{CPMAP,>CPMAP 

$06.8 * LD B.8 


2407 1B4A 

2408 1B4B 

2409 1B4C 

2410 1B4E 
241) 1B4F 

2412 1B50 

2413 1B51 

2414 1B53 

2415 1B54 

2416 1B56 

2417 1B57 

2418 1B58 

2419 1B5A 

2420 1B5B 

2421 1B5D 

2422 1B5E 

2423 1B5F 

2424 1B60 

2425 1B62 

2426 1B63 

2427 1B65 

2428 1B66 

2429 1B7C 

2430 1B7E 

2431 1B80 

2432 1B81 

2433 1B83 

2434 1B84 

2435 1B85 

2436 1B87 

2437 1B88 

2438 1B89 

2439 1B8B 

2440 

2441 

2442 

2443 1B8C 

2444 1B8E 

2445 1B90 

2446 1B92 

2447 1B94 

2448 

2449 

2450 

2451 1B96 

2452 1B97 

2453 1B98 

2454 1B99 

2455 1B9A 

2456 1B9B 

2457 1B9C 

2458 1B9D 

2459 

2460 

2461 

2462 1B9E 

2463 1B9F 

2464 1BA1 

2465 

2466 

2467 


COLD1 FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FDB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 

COLD2 FCB 

COLD21 FCB 
FCB 
FCB 
FCB 
FCB 
FCC 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 


$7E 

$23 

$CF,6 

$10 

COLD1-* 


COLD1: LD A.(HL) 
INC HL 

SWORD SSCPCTL 
DJNZ COLD1 


LD HL.8000H 

$0080 

$22 ' LD (_WKSIZ),HL 

< WKSIZ,) WKSIZ 

$AF 1 XOR A 

$32 * LD { LPSW),A 

<_LPSW,> LPSW 

$32 ’ LD ( DVSWJ.A 

< DVSW,> DVSW 

$21 1 LD HL,22*$100 

0 

22 

SCF.15 ' SWORD SSLOCATE 

$CD * CALL MPRNT 

<MPRNT,>MPRNT 
EA 

'{<<<{ S-OS SWORD >>)>>• 

CR,EOS 

$3E,1 ‘ LD A.I 

$32 1 LD (CIPARM+6).A 

{CIPAR6,>C1PAR6 

$AF * XOR A 

$32 1 LD (COLD2+l).A 

<COLD21,>COLD21 

$FB ' El 

$2A ' LD HL,( USR) 

( USR.) USR 

SE9 " • JP (HL) 


* Console TAB bit aap 

8080 TABMAP FDB *1000000010000000 

8080 FDB *1000000010000000 

8080 FDB *1000000010000000 

8080 FDB *1000000010000000 

8080 FDB *1000000010000000 

* Color palette mop 


FCB 

FCB 

FCB 

FCB 

FCB 

FCB 


$00 

$10 

$20 

$30 

$47 

$57 

$67 

$77 


CPMAP: DB 00H 
DB 10H 
DB 20H 
DB 30H 
DB 47H 
DB 57H 
DB 67H 
DB 77H 


FCB $21 
FDB $2040 
FCB $C9 


VER: LD HL.4020H 
; FM-7 Ver.2 
RET 


Z-80 Coaaand handler 


2469 

2470 

2471 

2472 1BA2 00 

2473 1BA3 50 

2474 1BA4 19 

2475 1BA5 00 

2476 1BA6 19 

2477 1BA7 00 

2478 1BA8 00 

2479 1BA9 01 

2480 

2481 

2482 

2483 

2484 

2485 

2486 

2487 1BAA 21 

2488 1BAB A3 

2489 1BAD FE 

2490 1BAF 3E 

2491 1BB1 38 

2492 1BB2 01 

2493 1BB3 17 

2494 1BB4 32 

2495 1BB5 5C 

2496 1BB7 77 

2497 1 BBS 2B 

2498 1BB9 CF 

2499 1BBB B7 

2500 1 BBC C9 

2501 

2502 

2503 

2504 

2505 

2506 

2507 

2508 1BBD F5 

2509 1BBE E5 

2510 1BBF CF 

2511 1BC1 7D 

2512 1BC2 El 

2513 1BC3 B7 

2514 1BC4 20 

2515 1BC5 03 

2516 1BC6 FI 

2517 1BC7 C9 

2518 

2519 

2520 


2523 

2524 

2525 1BC8 F5 

2526 1BC9 3E 

2527 1BCB 18 

2328 1BCC 29 

2529 

2530 


2533 

2534 

2535 

2536 1BCD F5 

2537 1 BCE 3E 

2538 1BD0 18 

2539 1BD1 24 

2540 

2541 

2542 

2543 

2544 

2545 

2546 

2547 1BD2 3A 

2548 1BD3 83 

2549 1BD5 90 

2550 1BD6 3F 

2551 1BD7 D8 

2552 1BD8 CD 

2553 1BD9 DF 


Console Initialize paraaeter 


CIPARM FCB 0 

CIPAR1 FCB 00 

FCB 25 
FCB 0 
FCB 25 
FCB 0 
CIPAR6 FCB 0 
FCB 1 


CIPARM:DB 0 ; Back color 
DB 80 ; Coluabs 
DB 25 i Lines 
DB 0 ; Scroll start 
DB 25 ; Scroll lines 
DB 0 ; Disp. PF key 
DB 0 ; Erase flag 
DB 1 ; Green node 


Console width change 


IN A:Console width (80 or 40) 

OUT / 

BRK AF.HL 


WIDCH FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 

WIDCH4 FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 


$21 1 WIDCH: LD HL.C1PARM+1 

<CIPAR1,>CIPAR1 

SFE,40+1 • CP 40+1 

S3E.40 1 LD A.40 

$38 ' JR C.WIDCH4 

WIDCH4-*-l 

$17 * RLA 

$32 1 LD (_WIDTH),A 

< WIDTH.) WIDTH 

$77 ' LD (HL),A 

$2B * DEC HL 

$CF,1 * SWORD SSINIT 

$B7 1 OR A 

$C9 ’ RET 


When cursor X location is not zero,output CR 

IN / 

OUT / 

BRK / 


NL FCB $F5 
FCB $E5 
FCB SCF.14 
FCB $7D 
FCB $E1 
FCB $B7 
FCB $20 
FCB LTNL1—•—1 

FCB $F1 
FCB $C9 


NL: PUSH AF 
PUSH HL 

SWORD S$POS_XY 
LD A.L 
POP HL 
OR A 

JR NZ.LTNL1 

POP AF 
RET 


Output carriage return 


/ 

/ 

/ 


LTNL FCB 
LTNL1 FCB 
FCB 
FCB 


$F5 

S3E.CR 

$18 

PRINT1—*—1 


’ LTNL: PUSH AF 

• LTNL1: LD A.CR 

* JR PRINT1 


Sing BELL 


IN / 

OUT / 
BRK / 


BELL FCB 


$F5 • BELL: PUSH AF 

$3E,BEL * LD A.BEL 

$18 'JR PR INTI 

PRINT1---1 


Tabulation 


IN / 

OUT / 
BRK AF 


TAB 


TAB1 


FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 


$3A ’ TAB: LD A.(CNTCHR) 

(CNTCHR.>CNTCHR 

$90 1 SUB B 

$3F ' CCF 

$08 • RET C 

SCD 1 TAB1: CALL PRNTS 

<PRNTS,>PRNTS 


146 Oh! MZ 1987.8. 


► Z<D PC-8001mk II ffl“SWORD” X 

X68OOO0?f6&**C> Oh ! MZ i lt; 0 t O#: fc i.'9 

co~C L J; 
ffcjll jEA (18) -ItiSifi 







M T 


HE SENTINEL 


2554 1BDB 

2555 1BDC 

2556 IBDD 

2557 1BDE 
2556 

2559 

2560 

2561 

2562 

2563 

2564 

2565 1BDF 

2566 1BE0 

2567 1BE2 

2568 1BE3 

2569 

2570 

2571 

2572 

2573 

2574 

2575 

2576 1BE4 

2577 1BE5 

2578 1BE6 

2579 1BE8 

2580 

2581 

2582 

2583 

2584 

2585 

2586 

2587 1BE9 

2588 1BEA 

2589 1BEB 

2590 1 DEC 

2591 1BED 

2592 1BEE 

2593 1BEF 

2594 1BF1 

2595 1BF2 

2596 1BF3 

2597 

2598 

2599 

2600 
2601 
2602 

2603 

2604 1BF5 

2605 1BF6 

2606 1BF8 

2607 1BF9 

2608 1BFB 

2609 1BFD 

2610 1BFE 

2611 
2612 

2613 

2614 

2615 

2616 

2617 

2618 1BFF 

2619 1C00 

2620 1C01 

2621 1C02 

2622 1C04 

2623 1C05 

2624 1C06 

2625 1C07 

2626 1C08 

2627 1C09 

2628 1C0A 

2629 1C0B 

2630 1C0C 

2631 1C0D 

2632 

2633 

2634 

2635 

2636 

2637 

2638 

2639 1C0E 

2640 1C0F 

2641 1C11 

2642 1C12 

2643 

2644 

2645 

2646 

2647 

2648 

2649 

2650 1C13 

2651 1C14 

2652 1C15 

2653 1C17 

2654 108 

2655 1C1A 

2656 IOC 

2657 1C1D 

2658 

2659 

2660 
2661 
2662 

2663 

2664 

2665 1C1E 

2666 1C1F 

2667 1C20 

2668 1C22 

2669 1C23 

2670 1C24 

2671 1C25 

2672 1C26 

2673 1C27 

2674 1C28 

2675 

2676 

2677 

2678 

2679 

2680 
2681 
2682 

2683 

2684 1C29 

2685 1C2B 

2686 

2687 

2688 

2689 

2690 

2691 

2692 

2693 1C2C 

2694 1C2D 

2695 1C2E 

2696 

2697 

2698 

2699 

2700 


FCB 

FCB 

FCB 


$3C 

$20 

TAB1-*—1 
$C9 


Display space 


PRNTS FCB 
FCB 
FCB 
FCB 


$F5 

$3E,SPC 
$18 

PRINT1-*- 


PRNTS: PUSH AF 
LD A.SPC 
JR PRINT1 


Display hexa-deciaal 4 chan 
IN HL:Binary data 


PRTHL FCB $7C * PRTHL: LD A.H 

FCB $CD ’ CALL PRTHX 

FCB <PRTHX.)PRTHX 
FCB $7D ' LD A.L 

Display hexa-deciaal 2 charactor : 


PRTHX FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 

PRTHX1 FCB 
FCB 


AF 

$F5 • PRTHX: PUSH AF 

$0F • RRCA 

$0F 1 RRCA 

$0F 1 RRCA 

$0F ’ RRCA 

$CD * CALL PRTHX1 

<PRTHX1.)PRTHX1 

$F1 * POP AF 

$CD ‘ PRTHX1:CALL ASC 

<ASC,>ASC 


Output 1 charactor in Acc. 

IN A:Data 

OUT / 

BRK / 

PRINT FCB $F5 ’ PRINT: PUSH AF 

PRINT1 FCB $CF,10 * PRINT1:SWORD S$OUTCH 

FCB $CD ’ CALL CHKLPS 

FCB <CHKLPS,>CHKLPS 

FCB SCF.18 ’ SWORD 0$0UTLPC 

FCB $F1 * POP AF 

FCB $C9 ’ RET 

Output string inline paraaeter operation 

IN (SP):Strin8 top addr. 

OUT (SP):inc. return addr. 

BRK / 


FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 


$E3 

$EB 

$CD 

<NSX,>MSX 
$EB 
$F5 
$7E 
$23 
$B7 
$20 

MPRNTl-*-! 

$F1 

$E3 

$C9 


1 MPRNT: EX (SP).HL 
’ EX DE.HL 
’ CALL USX 

' EX DE.HL 
1 PUSH AF 

' MPRNTl:LD A,(HL) 

1 INC HL 
OR A 

' JR NZ.MPRNTl 

POP AF 
' EX (SP).HL 
’ RET 


Output string froa pointed by DE to data CR 
IN DE:Strin8 top addr. 


FCB 

FCB 

FCB 

FCB 


$F5 

$3E,CR 

$18 

MSX1-*-] 


MSG: PUSH AF 
LD A.CR 
JR MSX1 


MSX 

MSX1 


Output string froa pointed by DE to data ] 
IN DE:String top addr. 


FCB $F5 1 MSX: PUSH AF 

FCB $AF * XOR A 

FCB $CF.13 ’ MSX1: SWORD S$OUTLN 

FCB $CD ’ CALL CHKLPS 

FCB <CHKLPS,>CHKLPS 

FCB $CF,19 ’ SWORD S$OUTLPL 

FCB $F1 * POP AF 

FCB $C9 ’ RET 

Check line printer switch 


Z flag:(Set .'Switch of f . Reset: Swi tch on) 


i FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 


_LPSW,>_LPSW 


CHKLPS:PUSH HL 
LD HL,(_LPSW) 


$F1 


POP HL 
RET NZ 
POP AF 
POP AF 


$C9 

Output 1 charactor to line printer 

IN A .-Data 

OUT / 

BRK / 

When error detected,carry flag Bust be < 


SWORD S$OUTLPC 


s printer switch off 

/ 

/ 

/ 

$F5 
$18 

LPTONl-*-l 
i printer switch < 

/ 


2701 

2702 

2703 1C2F 

2704 1C30 

2705 1C31 

2706 1C32 

2707 1C33 

2708 1C35 

2709 1C36 

2710 

2711 

2712 

2713 

2714 

2715 

2716 

2717 

2718 

2719 1C37 

2720 1C39 

2721 

2722 

2723 

2724 

2725 

2726 

2727 

2728 1C3A 

2729 1C3C 

2730 

2731 

2732 

2733 

2734 

2735 

2736 

2737 1C3D 

2738 1C3F 

2740 

2741 

2742 

2743 

2744 

2745 

2746 

2747 1C40 

2748 1C42 

2749 

2750 

2751 

2752 

2753 

2754 

2755 

2756 

2757 1C43 

2758 1C45 

2759 

2760 

2761 

2762 

2763 

2764 

2765 

2766 

2767 1C46 

2768 1C48 

2769 

2770 

2771 

2772 

2773 

2774 

2775 

2776 

2777 1C49 

2778 1C4B 

2779 

2780 

2781 

2782 

2783 

2784 

2785 

2786 1C4C 

2787 1C4E 

2788 1C4F 

2789 IC50 

2790 1C51 

2791 1C53 

2792 1C54 

2793 1C55 

2794 1C57 

2795 1C58 

2796 1C59 

2797 1C5B 

2798 1CSD 

2799 1C5E 

2800 1C5F 

2801 1C60 

2802 1C61 

2803 1C62 

2804 1C63 

2806 1C64 

2807 1C65 

2808 1C66 

2809 1C67 

2810 1C68 

2811 1C69 

2812 1C6A 

2813 

2814 

2815 

2816 

2817 

2818 

2819 

2820 1C6B 

2821 1C6D 

2822 1C6E 

2823 1C70 

2824 1C72 

2825 

2826 
2827 
2626 

2829 

2830 

2831 

2832 

2833 

2834 1C73 

2835 1C74 

2836 1C76 

2837 1C77 

2838 1C78 

2839 1C7A 

2840 1C7B 

2841 

2842 

2843 

2844 

2845 

2846 

2847 


LPTON FCB 
FCB 

LPTON1 FCB 
FCB 


$F5 

$3E 

$AF 

$32 


LPTON: PUSH AF 
DB 3EH : LD A.n 
LPTON1:XOR A 
LD ( LPSW),A 


_LPSW,>_LPSW 
FCB $F1 * POP AF 

FCB $C9 ’ RET 

Input 1 line froa console with echo back 

IN DE:Input buffer addr. 

OUT / 

BRK / 

When abort,store $1B to input buffer top 


FCB $C9 
Cheack 'BREAK' key status 


FCB $C9 
Input 1 charactor fr 


>a key-bord real tiae 


Input 1 charactor froa key-bord with wait 


EQU 

FCB 

FCB 


FLGET: EQU $ 

INKEY: SWORD I $INCH 
RET 


Read cursor location 


OUT 

BRK 


H:Cursor Y pos. 
L:Cursor X pos. 


Read charactor froa console buffe: 

IN H:Console Y coodinate 

L:Console X coodinate 
OUT A:Console char, data 


Set cursor locatioi 


SWORD S$LOCATE 


Pause by space key 


PAUSE FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 

PAUWAI FCB 
FCB 
FCB 
FCB 

PAUEXT FCB 
FCB 
FCB 
FCB 
FCB 

PAUBRK FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 


AF 

$CF,8 

$B7 

$28 

PAUEXT-*-l 

$FE.ESC 

$28 

PAUBRK-*-l 

$FE,SPC 

$20 

PAUEXT-*-l 

$CF,7 

$FE,ESC 

$28 

PAUBRK-*-l 

$E3 

$23 

$23 

$E3 

$C9 

$E3 

$7E 

$23 

$66 

$6F 

$E3 

$C9 


PAUSE: SWORD S$INCHR 
OR A 

JR Z.PAUEXT 


PAUWAI:SWORD I$INCH 
CP ESC 
JR Z.PAUBRK 

PAUEXT:EX <SP),HL 

INC HL 

INC HL 

EX (SP).HL 

RET 

PAUBRK:EX <SP),HL 
LD A,(HL) 

INC HL 
LD H.(HL) 

LD L,A 
EX (SP).HL 


Convert binary data to hexa-deciaal 


A:Binary data 

A:Hexa-deciaal data (ASCII coded) 


FCB 

FCB 

FCB 

FCB 

FCB 


AF 

$F6,$F0 
$27 

$C6.160 
$CE,64 
$C9 


ASC: OR 0F0H 
DAA 

ADD A.160 
ADC A.64 
RET 


Convert hexa-deciaal data to binary (4) 

IN DE:Pointer of hexa-deciaal data 

OUT HL:Binary data 

BRK AF,DE(+4 inc.).HL 

When error detect,carry flag aust be on. 

FCB $CD ' HLHEX: CALL AHEX 

FCB <AHEX,>AHEX 

FCB $67 ' LD H.A 

FCB $D4 ' CALL NC,AHEX 

FCB <AHEX,>AHEX 

FCB $6F ' LD L,A 

FCB $C9 ' RET 

Convert hexa-deciaal data to binary (2) 

IN DE:Pointer of hexa-deciaal data 

OUT A :Binary data 

BRK AF,DE(+2 Inc.) 
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2848 

2849 

2850 IC7C 

2851 1C7D 

2852 1C7E 

2853 IC7F 

2854 1C80 

2855 1C82 

2856 1C83 

2857 1C84 

2858 1C85 

2859 1C86 

2860 1C87 

2861 1C88 

2862 1C89 

2863 1C8A 

2864 1C8B 

2865 1C8C 

2866 1C8E 

2867 1C8F 

2868 1C90 

2869 1C91 

2870 1C92 

2871 

2872 

2873 

2874 

2875 

2876 

2877 

2878 

2879 

2880 1C93 

2881 1C95 

2882 1C96 

2883 1C98 

2884 1C99 

2885 1C9A 

2886 1C9C 

2887 1C9D 

2888 1C9F 

2889 1CA1 

2890 1CA2 

2891 

2892 

2893 

2894 

2895 

2896 

2897 

2898 1CA3 

2899 1CA4 

2900 1CA6 

2901 1CA7 

2902 

2903 

2904 

2905 

2906 

2907 

2908 

2909 

2910 1CA8 

2911 1CA9 

2912 1CAB 

2913 1CAC 

2914 

2915 

2916 

2917 

2918 

2919 

2920 

2921 

2922 

2923 1CAD 

2924 1CAF 

2925 1CB0 

2926 1CB1 

2927 1CB2 

2928 1CB3 

2929 1CB4 

2930 1CB5 

2931 1CB6 

2932 1CB7 

2933 

2934 

2935 

2936 

2937 

2938 

2939 

2940 

2941 1CB8 

2942 1CB9 

2943 1CBA 

2944 ICBC 

2945 1CBD 

2946 1CBE 

2947 1CBF 

2948 1CC0 

2949 1CC1 

2950 1CC2 

2951 

2952 

2953 

2954 

2955 

2956 

2957 

2958 1CC3 

2959 1CC4 

2960 1CC6 

2961 1CC7 

2962 1CC8 

2963 1CC9 

2964 1CCB 

2965 

2966 

2967 

2968 

2969 

2970 

2971 

2972 

2973 1CCC 

2974 1CCD 

2975 1CCF 

2976 1CD0 

2977 1CD1 

2978 

2979 

2980 

2981 

2982 

2983 

2984 

2985 1C02 

2986 

2987 

2988 

2989 

2990 

2991 

2992 

2993 

2994 1CD4 


When error detect,carry flag aust be < 


FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB ■ 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 


$C5 

$1A 

$13 

$CD 

<HEX,>HEX 
$38 

AHEX1—*-l 
$0F 


$0F 

$4F 

$1A 

$13 

$CD 

<HEX,>HEX 
$38 

AHEX1—*—1 
$B1 


$C1 

$C9 


AHEX: PUSH BC 
LD A,(DE) 

INC DE 
CALL HEX 

JR C.AHEX1 

RRCA 
RRCA 
RRCA 
RRCA 
LD C, A 
LD A.(DE) 

INC DE 
CALL HEX 

JR C.AHEX1 
OR C 

AHEX1: POP BC 
RET 


Convert hexa-deciaal data to binary in Acc. 

IN A:Hexa-deciaal data (ASCII coded) 

OUT A:Binary data 
BRK AF 

When error detect,carry flag aust be on 


FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 


$D6,’0 
$D8 

$FE,10 
$38 

HEXl-*-l 
$FE,17 
$D8 
$D6,7 
$FE.$10 
$3F 
$C9 


•HEX: SUB 

• RET C 

• CP 10 

• JR C.HEX1 


CP 10H 
HEX1: CCF 
RET 


Read byte data from video memory 


FCB $EB 
FCB $cf.; 
FCB $EB 
FCB $C9 


PEEK: EX DE.HL 
SWORD S$VMREAD 
EX DE.HL 
RET 


Write byte data to video memory 


FCB $EB 
FCB $CF,23 
FCB $EB 
FCB $C9 


POKE: EX DE.HL 
SWORD S$VMWRIT 
EX DE.HL 
RET 


Read data block from video memory 

IN BC:Bytm count of data 

DE:VRAM addr. 

HL:Buffer addr. of main memory 


FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 


$CF,22 

$13 

$77 

$23 

$0B 

$78 

$B1 

$30 

PEEK L—*- 
$C9 


PEEK L:SWORD S$VMREAD 

INC DE 

LD <HL),A 

INC HL 

DEC BC 

PEEK : LD A.B 
OR C 

JR NZ.PEEK_L 


Write data block to video aemory 


OUT 
BRK 
POKE L FCB 
FCB 
FCB 
FCB 
FCB 

POKE FCB 
FCB 
FCB 
FCB 
FCB 


BC:Byte count of data 
DE:VRAM addr. 

HL:Buffer addr. of main memory 

/ 

AF.BC,DE.HL 


$7E 
$23 
$CF.23 
$13 
$08 
$78 
$B1 
$20 

POKE L—*—1 
$C9 


POKE L:LD A,(HL) 
INC HL 

SWORD SSVMWRIT 
INC DE 
DEC BC 

POKE : LD A,B 
OR C 

JR NZ,POKE_L 
RET 


Input from I/O port 


FCB 

FCB 

FCB 

FCB 

FCB 

FDB 

FCB 


$C5 

$06,$FD 

$1A 

$C1 

$17 

SCB1F 

$C9 


• INP: PUSH BC 

• LD B.FDH 

’ LD A.(BC) 

• POP BC 
' RLA 


RET 


Output to I/O port 


FCB 

FCB 

FCB 

FCB 

FCB 


$C5 

$06,$FD 
$02 
$C1 
$C9 


/ 

$CF.30 


OUT: PUSH BC 
LD B.FDH 
LD (BC).A 
POP BC 
RET 


BOOT: SWORD S$NEW_ON 


Set file descriptor 


3062 1D2F 

3063 1D30 


3084 1D47 

3085 ID49 

3086 1D4A 


3106 

3107 

3108 

3109 

3110 

3111 

3112 

3113 1D62 


FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FDB 

FCB 

FCB 

FCB 

FCB 


FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FILE2 FCB 

FILE2A FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 

FILE2B FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 

FILE21 FCB 

FILE2C FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 

MZ0DF FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 

FILE3 FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 

FILE31 FCB 
FCB 
FCB 
FCB 
FCB 

FILE32 FCB 
FCB 
FCB 

GETDEV FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 

GETDV1 FCB 
FCB 
FCB 

TOUPER FCB 
FCB 
FCB 
FCB 
FCB 
FCB 


<FNAME,>FNAME 
$D5 1 PUSH DE 

$21 * LD HL.NAMEBF 

<NAMEBF,>NAMEBF 
$11 1 LD DE.INFBLK 

<INFBLK,>INFBLK 
$01 * LD BC,18 

18,0 

$EDB0 • LDIR 

$D1 * POP DE 

$CD 1 CALL SPCUT 

<SPCUT,>SPCUT 
$B7 ’ OR A 

$C9 1 RET 

$21 * FNAME: LD HL.NAMEBF 

<NAME8F.>NAMEBF 

$77 ’ LD (HL),A 

$23 ’ INC HL 

$32 ’ LD ( FTYPE),A 

< FTYPE.> FTYPE 

$CD ' CALL GETDEV 

<GETDEV,>GETDEV 

$CD ’ CALL DVCHK? 

<DVCHK@,>DVCHK@ 

$D8 * RET C 

$32 • LD ( DSK),A 

< DSK,>_DSK 

$06.13 ’ FILE2: LD B,13 

$CD ’ FILE2A:CALL FILE3 

<FILE3,>FILE3 
$CD 1 CALL PTOSPC 

< PTOSPC,> PTOSPC 

$20 1 JR NZ.FILE2B 

FILE2B---1 

DEC DE 

FILE2B:LD (HL),A 
INC DE 
INC HL 
DJNZ FILE2A 


$1B 
$77 
$13 
$23 
$10 

FILE2A—*—1 
$1A 

$FE,’. 

$20 

FILE21---1 
$13 
$06,3 
$CD 

<FILE3,>FILE3 


' LD A,(DE) 

• CP 

• JR NZ.FILE21 


$77 
$13 
$23 
$10 

FILE2C-' 
$36,SPC 
$3A 


INC DE 

FILE21:LD B.3 
FILE2C:CALL FILES 
3 

LD (HL),A 
INC DE 
INC HL 
DJNZ FILE2C 


• LD (HL).SPC 
' LD A,(_DSK) 

< U5K,> DSK . 

$CD ' CALL TPCHK? 

<TPCHK@,>TPCHK@ 

$C0 ’ RET NZ 

$FE,'S ’ CP ’S* 

$C8 1 RET Z 

$21 ’ LD HL.NAMEBF+17 

<NAME17.>NAME17 
$06,17 1 LD B.17 

$7E 1 MZ0DF: LD A,(HL) 

$FE,SPC+1 ’ CP SPC+1 

$D0 1 RET NC 

LD A.CR 
LD (HL).A 
DEC HL 
DJNZ MZ0DF 


$3E,CR 

$77 

$2B 

$10 

MZ0DF-*-l 

$C9 


RET 


<SPCUT,>SPCUT 
$1A 1 LI 


$D1 
$FE.’: 

$28 

FILE32-*-l 

$FE.SPC 

$38 

FILE32---1 

$1A 

$C9 

$3E,SPC 

$1B 

$C9 


JR Z.FILE32 


FILE32:LD A.SPC 

DEC DE 

RET 

GETDEV:CALL SPCUT 


$CD 

<SPCUT,>SPCUT 
$13 ' INC DE 

$1A * LD A,(DE) 

$1B ' DEC DE 

$FE,’: ’CP ’ : • 

$C2 ' JP NZ.RDVSW 

cRDVSW,>RDVSW 


$1A 
$13 
$13 


GETDV1:LD A,(DE) 
INC DE 
INC DE 


RET NC 
SUB SPC 
RET 


Diplay directory list 


BRK 

FCB 


FILE: CALL FNAME 


FPRNT FCB 
FCB 
FCB 

FPRNTA FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 

FILPR1 FCB 
FCB 
FCB 
FCB 

FILPR2 FCB 
FCB 
FCB 


FCB 

FCB 

FCB 


$11 • FPRNT: LD DE,INFBLK+1 

<INFBK1.>INFBK1 

$06,13 ‘ LD B.13 

$1A • FPRNTA:LD A,(DE) 

$CD • CALL FILE31 

<FILE31,>FILE31 

$CD ’ CALL PTOSPC 

<PTOSPC,>PTOSPC 

$CD ’ CALL PRINT 

< PRINT,> PRINT 

$13 ' INC DE 

$10 ' DJNZ FPRNTA 

FPRNTA---1 

$3E,*. 'FILPR1:LD A,‘’ 

$CD ' CALL PRINT 

<PRINT,>PRINT 

$06,3 ' LD B,3 

$1A ' FILPR2:LD A,(DE) 

$CD ‘ CALL FILE31 

<FILE31,>FILE31 

$CD 1 CALL PRINT 

<PRINT,>PRINT 

$13 1 INC DE 

$10 1 DJNZ FILPR2 

FILPR2-*-l 

$CF,8 ’ SWORD S$INCHR 

SFE.SPC • CP SPC 

$C0 ' RET NZ 
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HE SENTINEL 


3142 1DBA CF 

3143 1D8C C9 

3144 

3145 

3146 

3147 1D8D FE 

3146 1 DBF C0 

3149 1D90 3E 

3150 1092 C9 

3151 

3152 

3153 

3154 

3155 

3156 

3157 

3158 1093 E6 

3159 1D95 47 

3160 1096 21 

3161 1D97 00 

3162 1D99 7E 

3163 1D9A E6 

3164 1D9C B8 

3165 1D9D 20 

3166 1D9E ID 

3167 1D9F 3A 

3168 1DA0 20 

3169 1DA2 F5 

3170 1DA3 3A 

3171 1DA4 5D 

3172 1DA6 32 

3173 IDA7 20 

3174 IDA9 CD 

3175 IDAA E9 

3176 IDAC FI 

3177 1DAD 32 

3178 1DAE 20 

3179 1DBO 11 

3180 1DB1 00 

3101 1DB3 21 

3182 1DB4 FA 

3183 1DB6 06 

3184 lDBO CD 

3185 1DB9 C7 

3186 1DBB C0 


FCB $CF,7 • SWORD S$INCH 

FCB $C9 * RET 

. -> SPC 


PTOSPC 


FCB 

FCB 

FCB 

FCB 


$FE,’. 
$C0 

$3E,SPC 

$C9 


PTOSPC CP 
RET N2 
LD A.SPC 
RET 


Coapare file naae 


IN / 

OUT / 

BRK / 


FSAME FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 


FCB 

FCB 

FCB 

FCB 


SE6,*10000111 'FSAME: AND 100001UH 

$47 ' LD B.A 

$21 ' LD HL.INFBLK 

<INFBLK,>INFBLK 

$7E ' LD A.(HL) 

$E6.*10000111 ' AND 10000111H 
$B8 ' CP B 

$20 ' JR NZ.FSKIP 

FSKIP-'-l 

$3A ' LD A,( DFDV) 

< DFDV,>_DFDV 

$F5 ' PUSH AF 

$3A ' LD A,(_DSK) 

<_DSK,> DSK 

$32 " ' LD ( DFDV).A 

< DFDV,> DFDV 

$CD “ ' CALL FNAME 

<FNAME,>FNAME 
$F1 ' POP AF 

$32 ' LD (_DFDV),A 

< DFDV,> DFDV 

$Tl " ' LD DE.INFBLK 

<INFBLK,>INFBLK 
$21 ' LD HL.NAMEBF 

<NAMEBF,>NAMEBF 
$06,16 ' LD B,16 

$CD ' CALL TCOMP 

<TCOMP,>TCOMP 
$C0 ' RET Z 


3188 1DBC 

3189 1DBE 

3190 1DBF 


3E FSKIP FCB $3E,8 
B7 FCB $B7 

C9 FCB $C9 


FSKIP: LD A,8 

OR A 

RET 


3289 1E2C 

3290 1E2D 

3291 1E2E 

3292 1E2F 

3293 1E30 

3294 1E31 

3295 1E32 

3296 1E33 

3297 1E34 

3298 1E35 

3299 1E36 

3300 1E37 

3301 1E38 

3302 1E39 

3303 1E3A 

3304 1E3C 

3305 1E3E 

3306 

3307 

3308 

3309 1E3F 

3310 1E40 

3311 1E42 

3312 1E43 

3313 1E45 

3314 1E46 

3315 1E48 

3316 1E49 

3317 1E4A 

3318 1E4B 

3319 1E4C 

3320 1E4D 

3321 1E4F 

3322 1E50 

3323 

3324 

3325 

3326 1E52 

3327 1E53 

3328 1E75 


FCB 

CMDEXE FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 


$00 

SF1 

$38 

CHDILL-*- 

SF1 

SCI 


$D9 

$F1 

$C1 

$D1 

$E1 

$DD,$E1 
$FD,$E1 
$C9 


NOP 

POP AF 
JR C.CMDILL 

POP AF 
POP BC 
POP DE 
POP HL 
EX AF.AF' 
EXX 

POP AF 
POP BC 
POP DE 
POP HL 
POP IX 
POP IY 
' RET 


Systea call error handling routine 


$11 ' CHDILL:LD DE.ILLMSG 

<ILLMSG,>ILLMSG 
$CD ' CALL MSX 

<MSX,>MSX 

$21 ' LD HL,20 

20,0 
$39 
$F9 
$E1 
$2B 
$CD 


CHDILL FCB 
FCB 
FCB 
FCB 
FCB 


FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 


* Systea call error aassage 

ILLMSG FCB CR 

FCC ‘Illigal systea call detectded at 
FCB EOS 


ADD HL.SP 
LD SP.HL 
POP HL 
DEC HL 
CALL PRTHL 


<PRTHL,>PRTHL 
$C3 ' JP DEBUG 

<DEBUG,>DEBUG 


3330 

3331 * End of Z-80 Systea aodule 

3332 


3334 1E76 

3335 

3336 

3337 


00E5 


RIB $1F5B-* 

S-OS grobal work 6 systea sub-rotuine hook aodule 


3192 1DC0 

3193 1DC1 

3194 1DC2 

3195 1DC4 

3196 1DC5 

3197 1DC6 


13 CUTLP FCB $13 

1A SPCUT FCB $1A 

FE FCB SFE.SPC 

28 FCB $28 

FA FCB CUTLP—*-l 

C9 FCB $C9 


CUTLP: INC DE 
SPCUT: LD A,(DE) 
CP SPC 
JR 2.CUTLP 

RET 


3339 

3340 

3341 

3342 

3343 

3344 

3345 


DOS aodule entry equation 


234F RDD EQU S234F 
237C GETFCB EQU $237C 
232D WRD EQU $232D 
22B3 WOPEN EQU $22B3 


RDD EQU 234FH 
GETFCB EQU 237CH 
WRD EQU 232DH 
WOPEN EQU 22B3H 


3199 1DC7 

3200 1DC8 

3201 1DC9 

3202 1DCA 

3203 1DCC 

3204 1DCD 

3205 1DCE 

3206 1 DCF 


13 

23 

7E 

FE 

30 

02 

AF 

C9 


TCOMP 


FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 


$13 

$23 

$7E 

SFE.SPC+l 

$30 

TCOMPl-*-l 

$AF 

$C9 


TCOMP: INC DE 
INC HL 
LD A, (HI.) 

CP SPC+1 
JR NC.TCOMP1 

XOR A 
RET 


3208 

3209 

3210 

3211 

3212 

3213 

3214 

3215 

3216 

3217 

3218 

3219 

3220 

3221 

3222 

3223 

3224 

3225 

3226 

3227 

3228 

3229 

3230 

3231 

3232 

3233 

3234 

3235 

3236 

3237 

3238 

3239 

3240 

3241 

3242 

3243 

3244 

3245 

3246 

3247 

3248 

3249 

3250 

3251 

3252 

3253 

3254 

3255 

3256 

3257 

3258 


1DD0 
1DD1 
1DD2 
1DD4 
1DD5 
1DD6 
1DD7 
1DD9 
1DDA 
1DDB 
1DDD 
1DDE 
1DDF 
1DE0 
1DE1 
1DE2 
1DE3 


1DE4 
1DE5 
1DE7 
1DE8 
IDEA 
1DEB 
1DED 
IDEE 
1DF0 
1DF1 
1DF3 
1DF4 


1DF6 
1DF8 
1DF9 


1DFA 


TCOMP1 FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 


<PTOSPC.)PTOSPC 
$4F ' LD C.A 

$1A ' LD A.(DE) 

$CD ' CALL PTOSPC 

<PTOSPC.)PTOSPC 


$B9 
$C0 

SFE.CR 

SCO 

$23 

$13 

$10 

TCOMP1-*-1 

$AF 

$C9 


CP C 
RET NZ 
' CP CR 
' RET Z 
INC HL 
INC DE 
DJNZ TCOMP1 


RDI FCB 

FCB 

TROPN FCB 
FCB 

WRI FCB 

FCB 

TWRD FCB 
FCB 

TRDD FCB 

£ 

FCB 


$C3 

<CASDMY, 
$C3 

<CASDMY, 

<CASDMY, 

$C3 

<CASDMY, 
$C3 

<CASDMY, 
$C3 

<CASDMY, 


' RDI: JP CASDMY 
>CASDMY 

' TROPN: JP CASDMY 
>CASDMY 

' WRI: JP CASDMY 
>CASDMY 

' TWRD: JP CASDMY 
>CASDMY 

' TRDD: JP CASDMY 
>CASDMY 

' TDIR: JP CASDMY 
>CASDMY 


Cassette duaay GAP 


CASDMY FCB 
FCB 
FCB 


$3E, 2 

$37 

$C9 


File naae buffer 
18 


CASDMY:LD A.2 : Offlii 

SCF 

RET 


NAHEBF:DS 18 


r EQU NAMEBF+17 
Structure of stack shattle 

0.Y 2 4 6 8 10 12 14 16 18 20 22 

I I I I I I I I I I I I 

AF'.AF',BC',DE‘,HL',AF, BC.DE.HL.IX.IY: PC 


3260 

3261 

3262 

3263 1E0C 

3264 1E0D 

3265 1E0E 

3266 1E0F 

3267 1 El 0 

3268 1 El 1 

3269 1E13 

3270 1 El 4 

3271 1 El 5 

3272 1E17 

3273 1 El 9 

3274 1 ElA 

3275 1E1B 

3276 1E1C 

3277 1E1D 

3278 1E1E 

3279 1 ElF 

3280 1E20 

3281 1E21 

3282 1E22 

3283 1E23 

3284 1E24 

3285 1E26 

3286 1E28 

3287 1E29 

3288 1E2A 


Coaaand executor ——— 


E3 

F5 

7E 

23 

32 

82 

FI 

E3 

FD 

DD 

E5 

D5 

C5 

F5 

08 

D9 

ES 

D5 

C5 

F5 

F5 

ED 

80 

AF 

32 

05 


CMDGO FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 


FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 


$E3 ' CMDGO: EX (SP),HL 

$F5 ' PUSH AF 

$7E ' LD A,(HL> 

$23 ’ INC HL 

$32 ’ LD (FUNCNO),A 

< FUNCNO,)FUNCNO 
$F1 ' POP AF 

$E3 ' EX (SP).HL 

$FD,$E5 ' PUSH IY 

$DD,$E5 ' PUSH IX 

$E5 ' PUSH HL 

$D5 ’ PUSH DE 

$C5 ' PUSH BC 

$F5 ' PUSH AF 

$08 ' EX AF.AF' 

$D9 ' EXX 

$E5 ' PUSH HL 

$D5 ' PUSH DE 

$C5 ' PUSH BC 

$F5 ' PUSH AF 

$F5 ' PUSH AF 

$ED,$73 ' LD (ZSTKPT).SP 

<ZSTKPT,>ZSTKPT 

$AF ' XOR A 

$32 ' LD ( SBSOUT),A 

<SBSOUT,>SBSOUT 


3347 


2100 HOT EQU $2100 


HOT EQU 2100H 


3349 2544 

3350 255A 

3351 2419 

3352 22FA 

3353 2508 

3354 2526 

3355 24AC 

3356 2477 


DSKRED EQU $2544 
DSKWRT EQU $255A 
DIR EQU $2419 
ROPEN EQU $22FA 
SET EQU $2508 
RESET EQU $2526 
NAME EQU $24AC 
KILL EQU $2477 


DSKRED EQU 2544H 
DSKWRT EQU 255AH 
DIR EQU 2419H 
ROPEN EQU 22FAH 
SET EQU 2508H 
RESET EQU 2526H 
NAME EQU 24ACH 
KILL EQU 2477H 


3358 

3359 


25AD RDVSW EQU $25AD ’ RDVSW EQU 25ADH 

25C9 SDVSW EQU $25C9 ' SDVSW EQU 25C9H 


3363 

3364 

3365 1F5B 

3366 1F5C 

3367 1F5D 

3368 1F5E 

3369 lF60 

3370 1F62 

3371 1F64 

3372 1F66 

3373 1F67 

3374 1F68 

3375 1F6A 

3376 1F6C 

3377 1F6E 

3378 1F70 

3379 1F72 

3380 1F74 

3381 1F76 

3382 1F78 

3383 1F7A 

3384 1F7C 

3385 1F7D 

3386 1F7E 


286C ERROR EQU $286C 


' ERROR EQU 286CH 


S-OS Grobal work area 


19 

50 

41 

0E 

10 

00 

00 

50 

0001 

00 

FF 

00 

0002 

0002 

0002 

00 

00 

84 

83 

00 

00 

00 


MXLIN FCB 
WIDTH FCB 
_DSK FCC 
FATPS FCB 
_DIRPS FCB 
_FATBF FCB 
DTBUF FCB 
MXTRK FCB 
"DIRNO RMB 
WKSIZ FCB 
MEMAX FCB 
ISTKAD FCB 
EXADR RMB 
DTADR RMB 
“SIZE RMB 
IBFAD FCB 
KBFAD FCB 
XYADR FCB 
PRCNF FCB 
LPSW FCB 
DVSW FCB 
"USR FCB 


25 

80 

'A' 

$ 0 E ,$00 
$10.$00 
$00,$2E 
S00.S2F 
80 
1 

$00.$80 
$FF,$FB 
$00,$04 
2 
2 
2 

$00,$07 
$00,$06 
$84.$00 
$83.$00 
0 
0 

<HOT,)HOT 


Nuaber of line in console 
Nuaber of char, in line 
Current device naae 
FAT pos. 

Directory pos. 

FAT buffer addr. 

Data buffer addr. 

Nuaber of aaxaua track 
Directory No. 

Size of special work area 
Addr. of highst aeaory location 
Addr. of Systea stack 
Execute addr. of file 
Top addr. of file 
Size of file 

Addr. of Infoaation block 
Addr. of systea input buffer 
Addr. of cursor pos. work 
Addr. of char, countor work 
Line printer enable flag 
Magnetic tape foraat flag 
User prograa vector 


3388 1F80 

3389 

3390 

3391 

3392 1F80 

3393 1F81 


0000 RMB $1F80-* 

* - S-OS Systea sub-routine hook 1 — 

El GETPC® FCB 9E1 ' «3ETPC:POP HL 

E9 FCB $E9 ' (HL) JP (HL) 


3395 lF82 000C 


$1F8E-* 


3397 1F8E 

3398 1F8F 

3399 1F91 

3400 1F92 

3401 1F94 

3402 1F95 

3403 1F97 

3404 1F98 

3405 1F9A 

3406 1F9B 

3407 1F9D 

3408 1F9E 

3409 1FA0 

3410 1FA1 

3411 1FA3 

3412 1FA4 

3413 1FA6 

3414 1FA7 

3415 1FA9 

3416 1FAA 

3417 1 FAC 

3418 IFAD 

3419 1FAF 

3420 1FB0 

3421 1FB2 

3422 1FB3 

3423 1 FB5 

3424 1FB6 

3425 1FB8 

3426 1FB9 

3427 1FBB 

3428 1FBC 

3429 1FBE 

3430 1FBF 

3431 1FC1 

3432 1FC2 

3433 1FC4 

3434 1FC5 

3435 1FC7 


C3 

80 

00 

B3 

C3 

A3 

00 

BE 

C3 

A8 

C3 

62 

C3 

93 

C3 

D4 

C3 

4F 

C3 

7C 

C3 

2D 

C3 

B3 

C3 

73 

C3 

7C 

C3 

93 

C3 

6B 

C3 

E4 

C3 

E9 

C3 

CD 

C3 


MON# FCB 
FCB 

PEEK? FCB 
FCB 

PEEK# FCB 
FCB 

POKE? FCB 
_ FCB 

POKE# FCB 
FCB 

FPRNT# FCB 
FCB 

FSAME# FCB 

FILE# FCB 
FCB 

RDD# FCB 
FCB 

FCB# FCB 
FCB 

WRD# FCB 
FCB 

WOPEN# FCB 
FCB 

HLHEX# FCB 
FCB 

AHEX# FCB 
FCB 

HEX# FCB 
FCB 

ASC# FCB 
FCB 

PRTHL# FCB 
FCB 

PRTHX# FCB 
FCB 

BELL# FCB 
FCB 

PAUSE# FCB 


$C3 ' aMON: JP MON 

<DEBUG.)DEBUG 

$00 ' aPEEK#:JP PEEK 

<PEEK ,> PEEK 

$C3 ' aPEEK: JP PEEK 

<PEEK,)PEEK 

$00 ' 0POKE#:JP POKE 

<POKE ,>POKE 

$C3 ' aPOKE: JP POKE 

<POKE.)POKE 

$C3 ' OFPRNT.-JP FPRNT 

<FPRNT.)FPRNT 

$C3 ' aFSAME:JP FSAME 

<FSAME,)FSAME 

$C3 ' aFILE: JP FILE 

<FILE.>FILE 

$C3 ' 0RDD: JP RDD 

<ROD.)RDD 

$C3 ' aFCB: JP GETFCB 

<GETFCB,>GETFCB 
$C3 ' 0WRD: JP WRD 

<WRD.)WRD 

$C3 ' aWOPEN:JP WOPEN 

<WOPEN.)WOPEN 

$C3 ' 0HLHEX:JP HLHEX 

<HLHEX.)HLHEX 

$C3 ' a AH EX: JP AHEX 

<AHEX,>AHEX 

$C3 ' #HEX: JP HEX 

<HEX.)HEX 

$C3 ' SASC: JP ASC 

<ASC.)ASC 

$C3 ' aPRTHL:JP PRTHL 

<PRTHL.)PRTHL 

$C3 ' aPRTHX:JP PRTHX 

<PRTHX.)PRTHX 

$C3 ' aBELL: JP BELL 

<BELL.)BELL 

$C3 ' aPAUSE:JP PAUSE 
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3436 1FC8 

3637 1FCA 

3638 1FCB 

3639 1FCD 

3660 1FCE 

3661 1FD0 

3662 1FD1 

3663 1FD3 
3666 IFD6 

3665 1FD6 

3666 1FD7 

3667 1FD9 

3668 1FDA 

3669 1FDC 

3650 1 FDD 

3651 1FDF 

3652 1FE0 

3653 1FE2 
3656 lFE3 

3655 IFE5 

3656 1FE6 

3657 1FE8 

3658 1FE9 

3659 1FEB 

3660 1FEC 

3661 1 FEE 

3662 1FEF 

3663 1FF1 
3666 1FF2 

3665 1FF6 

3666 1FF5 

3667 1FF7 

3668 1FF8 

3669 1FFA 

3670 1FFB 

3671 1FFD 

3672 1FFE 

3673 
3676 

3675 

3676 2000 

3677 2001 

3678 2003 

3679 2006 

3680 2006 

3681 2007 

3682 2009 

3683 200A 
3686 200C 

3685 200D 

3686 200F 

3687 2010 

3688 2012 

3689 2013 

3690 2015 

3691 2016 

3692 2018 

3693 2019 
3696 201B 

3695 201C 

3696 201E 

3697 201F 

3698 2021 

3699 2022 

3500 2026 

3501 2025 

3502 2027 

3503 2028 
3506 202A 

3505 202B 

3506 2020 

3507 202E 

3508 2030 

3509 2031 

3510 2033 

3511 2036 

3512 2036 

3513 2037 
3516 

3515 

3516 

3517 2039 

3518 

3519 

3520 

3521 

3522 

3523 
3526 

3525 

3526 

3527 2900 

3528 2901 

3529 2903 

3530 2906 

3531 2906 

3532 2907 

3533 2909 
3536 290A 

3535 290C 

3536 290D 

3537 290F 


FCB <PAUSE.)PAUSE 

INKEYS FCB $C3 ' #INKEY:JP INKEY 

FCB <INKEY,>INKEY 

BRKEYS FCB $C3 1 0BRKEY:JP BRKEY 

FCB <BRKEY.>BRKEY 

GETKYS FCB $C3 ' OGETKY: JP GETKY 

FCB <GETKY.>GETKY 

GETLS FCB $C3 * 0GETL: JP GETL 

FCB <GETL,>GETL 

LPTOFS FCB $C3 * tfLPTOF:JP LPTOF 

FCB <LPTOF.)LPTOF 

LPTONS FCB $C3 1 #LPTON:JP LPTON 

FCB <LPTON.)LPTON 

LPRNTS FCB $C3 ’ #LPRNT:JP LPRNT 

FCB <LPRNT.)LPRNT 

TABS FCB $C3 1 WTAB: JP TAB 

FCB <TAB.)TAB 

MPRNTS FCB $C3 1 *MPRNT:JP MPRNT 

FCB <MPRNT,>MPRNT 

MSXS FCB $C3 * WMSX: JP NSX 

FCB <MSX, >HSX 

MSGS FCB $C3 1 WMSG: JP MSG 

FCB <MSG.)MSG 

NLS FCB SC3 1 *NL: JP NL 

FCB <NL,>NL 

LTNLS FCB SC3 1 #LTNL: JP LTNL 

FCB <LTNL.)LTNL 

PRNTSS PCB $C3 ’ #PRNTS:JP PRNTS 

FCB <PRNTS,)PRNTS 

PRINTS FCB $C3 ' #PRINT:JP PRINT 

FCB < PRINT,)PRINT 

VERS FCB $C3 * OVER: JP VER 

FCB <VER.)VER 

HOTS FCB $C3 ’ 6H0T: JP HOT 

FCB <HOT.)HOT 

COLDS FCB $C3 * ffCOLD: JP COLO 

FCB <COLD.)COLD 

■ - S-OS system sub-routine hook 2 - 

DRDSBS FCB $C3 ’ 0DRDSB:JP DSKRED 

FCB <DSKRED.>DSKRED 

DWTSBS FCB $C3 1 #DWTSB:JP DSKWRT 

FCB <DSKWRT.)DSKWRT 

DIRS FCB SC3 1 »DIR: JP DIR 

FCB <DIR.)DIR 

ROPENS FCB $C3 ’ *ROPEN:JP ROPEN 

FCB <ROPEN.)ROPEN 

SETS FCB $C3 * ASET) JP SET 

FCB <SET,>SET 

RESETS FCB $C3 * *RESET:JP RESET 

FCB <RESET.>RESET 

NAMES FCB $C3 1 0NAME: JP NAME 

FCB <NAME,>NAME 

KILLS FCB $C3 * OK ILL: JP KILL 

FCB <KILL,>KILL 

CSRS FCB $C3 * OCSR: JP CSR 

FCB <CSR.)CSR 

SCRNS FCB SC3 * OSCRN: JP SCRN 

FCB <SCRN,)SCRN 

LOCS FCB SC3 ' OLOC: JP LOC 

FCB <LOC.>LOC 

FLGETS FCB $C3 1 OFLGET:JP FLGET 

FCB <FLGET.)FLGET 

RDVSWS FCB $C3 * OREVSWsJP RDVSW 

FCB <RDVSW,>RDVSW 

SDVSWS FCB $C3 ’ OSDVSW:JP SDVSW 

FCB <SDVSW.)SDVSW 

INPS FCB $C3 * OINP: JP INP 

FCB <INP.)INP 

OUTS FCB $C3 ' OOUT: JP OUT 

FCB <OUT,>OUT 

WIDCHS FCB $C3 1 oWIDCH.JP WIDCH 

FCB <WIDCH,>WIDCH 

ERRORS FCB $C3 1 »ERROR:JP ERROR 

FCB <ERROR.)ERROR 

BOOTS FCB $C3 * *BOOT: JP BOOT 

FCB < BOOT,> BOOT 

* End of S-OS grobal work fi. system sub-routine hook 

RMB $2900-* 

* DOS module entry equation 


27 E3 
2851 
2863 


P FNAM EQU S27E3 

DEVCHK EQU $2851 

TPCHK EQU $2863 

• «•+♦ DOS GAP ♦♦♦ 


P FNAM EQU 27E3H 
DEVCHK EQU 2851H 
TPCHK EQU 2863H 


RDIS FCB 
FCB 

TROPNS FCB 
FCB 

WRIS FCB 


TWRDS 

TRDDS 

TDIRS 


<RDI,>RDI 
$C3 

< TROPN,> TROPN 
$C3 1 XWRI 

<WRI,)WRI 

<TWRD.)TWRD 
$C3 

<TRDD,>TRDD 
$C3 


*RDI: JP RDI 
2TR0PN:JP TROPN 
JP WRI 
XTWRD: JP TWRD 
*TRDD: JP TRDD 
tTDIR: JP TDIR 


3538 2910 

3539 2912 

3560 2913 

3561 2915 

3562 2916 

3563 2918 
3566 2919 

3566 291B 

3568 291E 

3569 291F 
3550 2920 

3552 2921 

3556 292A 

3555 292B 

3556 292C 

3557 292E 

3558 292F 

3559 2931 

3560 2932 

3561 2936 

3562 2935 

3563 2937 
3566 2938 

3565 293A 

3566 293B 

3567 293D 
3566 293E 

3570 293F 

3571 2960 

3572 2961 

3573 2963 
3576 2966 

3575 2966 

3576 2967 

3577 2969 

3578 296A 

3579 296C 

3580 296D 

3581 296F 

3582 2950 

3583 2952 
358* 2953 

3585 

3586 

3587 

3589 

3590 

3591 

3592 2956 

3593 
3596 

3595 

3596 2B00 

3597 2B01 

3598 2B03 

3599 2B06 

3601 2B06 

3602 

3603 

3604 

3605 

3606 

3607 

3608 

3609 

3610 

3611 2B07 

3612 2B08 

3613 2BOA 
361* 2B0C 

3615 2B0E 

3616 2B0F 

3617 

3618 

3619 

3620 

3621 

3622 

3623 
362* 

3625 

3626 2B10 

3627 2B11 

3628 2B13 

3629 2B15 

3630 2B17 

3631 2B1B 

3632 

3633 
363* 

3635 

3636 

3638 


FCB 

P7FNAM FCB 
FCB 

DVCHKS FCB 
FCB 

TPCHKS FCB 
FCB 

RMB 

OPNFG RMB 
“FTYPE RMB 
DFDV FCC 


FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

PARCSS FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 


< P_FNAM,)P_FNAM 


PSFNAM:JP P_FNAM 


<DEVCHK.)DEVCHK 


tDEVCHK:JP DEVCHK 


<TPCHK.)TPCHK 


KTPCHK:JP TPCHK 


*OPNFG:DS 1 
*FTYPE:DS 1 
SDFDV: DM 


$E5 

$2A 

<SIZESS 
$22 

< SIZE,i 
$2A 

<DTADRS. 
$22 

< DTADR. 
$2A 

<EXADRS. 
$22 

< EXADR. 
$E1 

$C9 

$E5 

$2A 

< SIZE,) 
$22 

<SI2ESS. 

$2A 

< DTADR. 
$22 

<DTADR@, 
$2A 

< EXADR. 
$22 

<EXADRS. 


$E1 

$C9 


' *PARSC:PUSH HL 
1 LD HL.(SIZESS) 
>SIZESS 

• LD ( SIZE),HL 
SIZE 

1 LD HL.(DTADR?) 
>DTADRS 

LD ( DTADR),HL 

> DTADR 

LD HL,(EXADR?) 

)EXADRS 

1 LD ( EXADR),HL 

> EXADR 

• POP HL 

• RET 

• kPARCS:PUSH HL 

• LD HL,(_SIZE) 

- SI ? E LD (SIZESS).HL 
>SIZESS 

' LD HL,(_DTADR) 

> DTADR 

• LD (DTADR?).HL 
>DTADR@ 

' LD HL.( EXADR) 
>_EXADR 

' LD (EXADR?),HL 
)EXADRS 

• POP HL 

• RET 


+++ End of DOS GAP +++ 

♦♦+ Auxaly memory device control module 
RMB $2B00-* 

Module hook & work area 

JP DRD 
JP DWRT 


FCB 

FCB 

FCB 

FCB 


<DRD.)DRD 
$C3 

<DWRT,>DWRT 


UNITNO FCB 0 


UNITNO:D 


Read floppy disk 


A :Number of access record 
DE:Number of top record 
HL:Road buffer addr. 

A :Error code 


$C5 1 DRD: PUSH BC 

$ED4B 1 LD BC.(UNITNO) 

tUNITNO.>UNITNO 
SCF.26 ’ SWORD S$FDREAD 

$C1 ‘ POP BC 

$C9 1 RET 


FCB 

FDD 

FCB 

FCB 

FCB 

FCB 


Write floppy disk 


DWRT FCB 
FDB 
FCB 
FCB 
FCB 
FCB 


A :Number of access record 
DE:Number of top record 
HL:Wrlte buffer addr. 

A :Error code 


$C5 ' DWRT: PUSH BC 

$ED4B ' LD BC.<UNITNO) 

<UNITNO,>UNITNO 

$CF,27 1 SWORD S$FDWRIT 

$C1 * POP BC 

$C9 1 RET 


Audio cassette handling routine 
not coding yet , future 


2B18 . PROEND EQU 


'J1H2 





15 1080 

16 1081 
17 1082 


21 

22 1083 

23 1085 
2* 1087 

25 1089 

26 108A 

27 108B 


IE2D 

0080 

0082 


0001 

0001 

0001 


1083 

0000 

0000 

0000 

e001 

00 


* +♦+ Z-80 emulator module +++ 1 

* LABEL EQUATION 

CMDEXE EQU $IE2D 

ZSTKPT EQU $0080 

FUNCNO EQU $0082 


DATA 
DATA2 
DATA 3 


RMB 

RMB 

RMB 


Work Area 

1 Fetched Code 

1 b5“b3 

l b2“b0 

Registers and Work 


$0000 

$0000 

$0000 


31 1090 

32 1092 

33 1093 
3* 1094 

36 1095 

37 1097 

38 1099 

39 109B 


43 

44 109D 

45 109F 

46 10A1 

47 10A3 

48 10A5 

49 10A7 

50 10A9 

51 10AB 


53 


58 1 OAF 

59 10BI 

60 10B3 

61 10B5 


0000 

0000 

0400 

0000 


FDB 

FDB 

FDB 

FDB 


$0000 

$0000 

$0400 

$0000 


109D INDEX2 I 


D6 92 
27 0B 
DE 9B 
E6 C0 
DF 9B 
DE 87 
33 C5 
39 


39 

10AF 
D6 92 
27 F9 
2B 0B 
DE 9B 


LDB 

BEQ 

LOU 

LDB 

STU 

LDU 

LEAU 

RTS 

EQU 

LDU 

RTS 


(IX+d) or ( IY+d) 


Get Displacemei 


INDEX 
mHL 
m 1 Yd 
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HE SENTINEL 


62 10B7 

63 10B9 

64 10BB 

65 10BD 

66 10BF 

66 10C0 

69 10C2 

70 10C4 

71 10C6 

72 10CB 

73 10CA 

75 10CB 

76 10CD 

77 10CF 
76 10D1 
79 10D3 

60 10D5 

61 10D7 

62 10D9 

63 10DA 

64 10DB 

65 10DC 

66 10DE 

67 10E0 
66 10E2 
69 10E3 

90 10E4 

91 10E5 

92 10E6 

93 10E7 

94 10E6 

96 


E6 C0 
DF 9B 
DE 95 
33 C5 
39 

DE 9B 
E6 CO 
DF 9B 
DE 97 
33 C5 
39 

9E 9B 
A6 60 
9F 9B 
97 60 
64 07 
97 62 

96 60 
44 

44 

44 

64 07 

97 61 
96 60 


,U* 


LDB 
STU 
LDU 
LEAD B.U 
RTS 


209 1166 26 D9 


■IYd LDU 

LDB 
STU 
LDU 
LEAU 
RTS 

GETDTA LDX 
LDA 
STX 
STA 
ANDA 
STA 
LDA 
LSRA 
LSRA 
LSRA 
ANDA 
STA 
LDA 
CLRB 
AS LA 
ROLB 
ASLA 
ROLB 
AS LB 
RTS 


99 10E9 

100 10EC 

101 10EF 


104 10F1 

105 10F4 

106 10F7 

107 10F9 
106 10FB 

109 10FD 

110 1101 
111 

112 1103 

113 1105 

114 1106 

115 110A 

116 110C 

lie 

119 110E 

120 1110 
121 1112 
122 1114 

124 

126 

127 1116 
126 1118 

129 111A 

130 11 IB 

131 11 IE 

132 1120 

134 

135 1122 

136 1124 

137 1126 
136 1128 

139 112A 

140 112C 

141 l12E 

142 1130 

143 1132 

144 1134 

145 1136 

146 1138 

147 113A 
146 113C 

149 113E 

150 1140 

152 


158 1145 

159 1146 

160 114A 

162 

163 114C 

164 114E 

165 1150 

166 1152 

167 1154 
166 1156 

169 1156 

170 115A 

172 

173 

174 

175 

176 

177 115C 

179 

180 115D 

181 115F 
162 1161 
183 1163 
164 1165 
185 1167 
166 1169 

168 

169 116A 

190 116C 

191 116E 

192 1170 

194 

195 1172 

196 1174 

197 H76 

198 1178 

200 

201 117A 

202 117C 

203 117E 

204 1180 

206 

207 1162 
206 1184 


PC 


PC 

,X+ 


Gel Data,Datal,2.3 


Store PrograaCounter 

DATA 

0X00000111 A=00000 b2 bl b0 

DATA 3 

DATA 


0X00000111 A-00000 b5 b4 b3 
DATA2 


B=0000O b7 b6 0 


•000000000000000000000000 


10E9 
CC 1E2D 
FD 109B 
20 06 

10F1 
CC 0000 
FD 109B 
34 06 
86 10 
IF 6B 
108E 1083 
0F 92 
1103 
9D CB 
BE 110E 
AE 65 
AD 64 
20 F5 

110E 
1116 
1440 
1465 
1543 


LDD 

STD 

BRA 

PC0000 EQU 
LDD 
STD 

ENTEHU PSHS 
LDA 
TFR 
LDY 
CLR 

NEXT EQU 
JSR 
LDX 
LDX 
JSR 
BRA 

JPTBL EQU 
FDB 
FDB 
FDB 
FDB 


0CMDEXE 

>PC 

ENTEHU 


0 $ 1 0 

A. DP 
0REGTOP 
INDEX 

GETDTA 
0JPTBL 

B. X 


Return f roa 6809 


COLO 

COL1 

COL2 

COL3 


00H“3FH 

40H-7FH 

80H-0BFH 

0C0H-0FFH 


1116 
96 80 
84 OF 
46 

BE 1122 
AE 86 
6E 84 

1122 
1142 
1199 
11D8 
1234 
1266 
1297 
12CC 
12E6 
1142 
11B7 
1205 
124C 
1266 
1297 
12CC 
12F.6 


1142 
1142 
96 81 
48 

BE l14C 
AE 66 
6E 84 

114C 
115C 
1190 
115D 
1161 
116A 
1172 
117A 
1162 

115C 
115C 
115C 
use 
115C 


EQU * S00“S3F 

LDA DATA 
ANDA 0$0F 

ASLA A»A*2 

LDX 0JPTBL2 
LDX A.X 
JHP .X 


JPTBL2 EQU 
FDB 
FDB 
FDB 
FDtf 
FDB 


FDB 

FDB 

FDB 

FDB 

FDB 

FDB 


COM0 0 
COH0_1 
COH0 2 
COMO 3 
COMO 4 
COMO 5 
COMO 6 
COMO 7 
COM0 6 
COM0_9 
COMO A 
COM0~B 
COMORO 
COM0~D 
COM0 E 
COM0_F 


COM0 0 EQU 
COHO 6 EQU 
LDA 
ASLA 
LDX 
LDX 
JMP 


FDB 

FDB 

FDB 

FDB 

FDB 


NOP 

EXAFAF 

DJNZ 

JR 

JRNZ 

JRZ 

JRNC 

JRC 


USD 
0A 83 
27 27 
9E 9B 


39 

116A 
96 8B 
65 40 
27 FI 
20 16 

1172 
96 8B 
85 40 

26 E9 
20 0E 

117A 
96 BB 
65 01 

27 El 
20 06 

1162 
96 BB 
85 01 


EQU 

LDA FI 
BITA 0X01000000 
BEQ JR 
BRA SKIP1 


If Z(fl«8)=0 


BRA SKIP1 
EQU 

LDA FI 
BITA 0XO0O0O0O1 


If Z(flag ) = 1 


If C(flag)=0 


211 

212 

213 

214 1186 

215 I18A 

216 118D 

217 l18F 

219 

220 1190 

221 1192 

222 1194 

223 1196 

224 1198 

226 

228 

229 1199 

230 119B 

231 119D 

232 119F 

233 11A1 

234 11 A3 

235 HAS 

236 11A7 

237 11A9 
236 UAB 

240 

241 11AC 

242 11AE 

243 11 BO 

244 11B2 

245 11B4 

246 11B6 

246 

250 

251 11B7 

252 11B9 

253 1 IBB 

254 11BD 

256 11BF 

257 UC1 

258 11C3 

259 UC5 

260 I1C7 

261 I1C9 

262 11CB 

263 1 ICO 

264 11CF 

266 

267 11D0 
266 11D2 

269 11D4 

270 11D6 

272 

274 

275 11D8 

276 11DA 

277 11 DC 
276 

279 11DE 

280 11EO 

281 11E2 

283 

264 11E3 

265 

266 11E5 
287 11E7 

268 11E9 

269 11EB 

290 11 ED 

291 11EF 

292 11 FI 

293 11F3 

294 11F5 

296 tlF6 

297 11F8 

298 UFA 

299 UFC 

300 11FE 

301 1200 

302 1202 

303 1204 

305 
307 

306 1205 

309 1207 

310 1209 

311 120B 

312 

313 120D 

314 120F 

315 1211 

317 

316 1212 

319 1214 

320 1216 

321 1216 

322 121A 

323 121C 

324 121E 

325 1220 

326 1222 

327 1224 

329 

330 1225 

331 1227 

332 1229 

333 122B 

334 122D 

335 122F 

336 1231 

337 1233 

339 

341 

342 1234 

343 1236 

344 1236 

345 

346 123A 

347 123C 

348 123E 

349 1241 

350 1243 

352 

353 1244 

354 1246 

355 1249 


1166 
1188 
1168 
DC 9B 
C3 0001 
DD 9B 
39 

1190 
DC 0A 
9E 93 
DD 93 
9F 8A 
39 


1199 

96 81 
81 06 
27 0D 
33 A6 
9E 9B 
E6 80 
A6 60 
9F 9B 
ED C4 
39 

11AC 
9E 9B 
EC 81 
9F 9B 
D7 99 

97 9A 


INnA 

OUTAn 

SKIP1 


LDD PC 
ADDD 01 
STD PC 
RTS 


If C(flag)*1 

IN A,(n) 

OUT (n).A 
1 Byte Skip 


EXAFAF EQU 
LDD 
LDX 
STD 
STX 
RTS 


39 


11B7 
96 61 
64 06 
61 06 
27 11 

EC A6 
D3 67 
DD 87 

96 8B 
84 C4 
24 02 
8A 01 

97 8B 
39 

11D0 
DC 99 
D3 87 
DD 87 
20 ED 


11DB 
96 81 
81 04 
24 05 


9E 9B 
E6 80 
A6 60 
9F 9B 
IF 01 
DC 87 
E7 84 
A 7 01 
39 

9E 9B 
E6 60 
A6 80 
9F 9B 
IF 01 
96 6A 
A7 64 
39 


1205 
96 81 
84 06 
81 04 
24 05 


39 

1212 
26 11 
9E 9B 
E6 80 
A6 80 
9F 9B 
IF 01 
E6 64 
A6 01 
DD 87 
39 

1225 
9E 9B 
E6 80 
A6 80 
9F 9B 
IF 01 
A6 64 
97 8A 
39 


1234 
96 81 
81 06 
27 0A 

33 A6 
EC C4 
C3 0001 
ED C4 


1244 
DC 99 
C3 0001 
DD 99 


COMO 1 EQU 
LDA 
CM PA 
BEQ 
LEAU 
LDX 
LDB 
LDA 
STX 
STD 
RTS 

LDSPnn EQU 
LDX 
LDD 
STX 
STB 
STA 
RTS 


DATA 2 
#$06 
LDSPnn 
A, Y 


LDA 
ANDA 
CM PA 


LDD 

ADDD 

STD 

ADMLrl LDA 
ANDA 
BCC 
ORA 

N0TC4 STA 
RTS 

ADHLSP EQU 
LDD 
ADDD 
STD 
BRA 


LD rp.nn 

Get b5 b4 b3 (b3=0) 


Store nn to Register 


Get nn 

Store nn to SP 


DATA2 

0X00000110 

#$06 

ADHLSP 

A,Y Get rp 

HI ADD HL.rp 

HI (Carry is not aove) 

FI Get Flog (Carry is not aove) 

0X11000100 (Carry is not aove) 

N0TC4 

0X00000001 

FI Store Flag 


COMO 2 EQU 
LDA 
CM PA 
BCC 

LDB 

STB 

RTS 


LDX 

LDB 

LDA 

STX 

TFR 

LDD 

STB 

STA 

RTS 

LDannA LDX 
LDB 
LDA 
STX 
TFR 
LDA 
STA 
RTS 


DATA2 

#$04 

LDann? 


If A«4 or A®6 
LD (rp).A 
Get DATA 
Store DATA 


Store A to (nn) 


COM0 A EQU 
LDA 
ANDA 
CM PA 
BCC 


LDB 

STB 

RTS 


BNE 

LDX 

LDB 

LDA 

STX 

TFR 

LDB 

LDA 

STD 

RTS 

LDAann EQU 
LDX 
LDB 
LDA 
STX 
TFR 
LDA 
STA 
RTS 


DATA2 

0X00000110 Get b5 b4 b3 (b3=0) 
#$04 

LD?ann If A-4 or A=6 

LD A,(rp) rp=BC,DE 
CA.Y] Get (rp) 

A1 


If A*=6 GOTO LD A.(n 
LD HL.(nn) 

Get nn 


Get (nn) 
Store to HL 


Store to Acc 


BEQ INCSP 

LEAU A.Y 
LDD ,U 
ADDD #1 
STD ,U 
RTS 


LDD 

ADDD 

STD 


Get rp 
Store rp 
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356 124B 39 


RTS 


358 


360 124C 

361 124C 96 81 

362 124E 84 06 

363 1250 81 06 

364 1252 27 0A 

365 

366 1254 33 A6 

367 1256 EC C4 

368 1258 83 0001 

369 125B ED C4 

370 125D 39 


COM0_B 


EQU 
LDA 
ANDA 
CM PA 
BEQ 


LEAU 

LDD 

SUDD 

STD 

RTS 


DATA2 

#200000110 Got b5 b4 b3 (b3<*0) 
#6 


DECSP 


DEC rp 


372 

373 125E 

374 1260 

375 1263 

376 1265 


125E DECSP EQU 
DC 99 LDD SP 

83 0001 SUBD #1 

DD 99 STD SP 

39 RTS 


378 


503 130D 

504 130D 48 

505 130E 25 07 

506 1310 

507 1310 D6 8B 

508 1312 C4 C4 

509 1314 D7 SB 

510 1316 39 

511 1317 

512 1317 8A 01 

513 1319 

514 1319 D6 8B 

515 131B C4 C4 

516 131D CA 01 


RLCs EQU 
A SLA 

BCS CARRY1 
NCARY1 EQU 

LDB FI Get Flog 

ANDB #211000100 

STB FI Store Flag 

CARRY1 EQU 

ORA #200000001 Sot b0 
CARY11 EQU 

LDB FI Got Flag 

ANDB #211000100 

ORB #200000001 Set CARRY 


517 131F D7 8B 

518 1321 39 


STB FI Store Flag 

RTS 


520 

521 1322 

522 1324 

523 1326 

524 1328 


1322 

96 8A 
8D 09 

97 8A 


RRCA 


EQU 

LDA 


Got Acc 


380 1266 

381 1266 

382 1266 96 81 

383 1268 81 06 

384 126A 27 22 

385 

386 126C E6 A6 

387 126E 5C 

388 126F E7 A6 

389 1271 96 8B 


COM0_4 EQU 
COHO C EQU 

LDA DATA2 
CMPA #6 
BEQ INCaHL 

INCr LDB A,Y 

INCB 

STB A.Y 
FLGINC LDA FI 


INC r 

Got r (r»B.C.D.E.H,L.A> 
Get Flag 


390 1273 84 01 

391 1275 Cl 00 

392 1277 26 02 

393 1279 BA 04 

394 127B 5D 

395 127C 26 03 

396 127E 8A 40 

397 1280 5D 

398 1281 2A 02 

399 1283 8A 80 

400 1285 C4 0F 

401 1287 26 02 

402 1289 8A 10 

403 128B 97 BB 

404 128D 39 


ANDA 

CHPB 

BNE 

ORA 

NTPV1 TSTB 
BNE 
ORA 
TSTB 

NOTZ1 BPL 
ORA 

NOTS1 ANDB 
BNE 
ORA 

NOTH1 STA 
RTS 


#$00000001 Keep Carry 

#$80 

NTPV1 

#$00000100 Set P/V (OVER FLOW) 
NOTZ1 

#*01000000 Set Zero 
NOTS1 

#*10000000 Set Sign 

#$0F 

NOTH1 

#*00010000 Set Half Carry 
FI 


406 128E 

407 128E 9D 9D 

408 1290 E6 C4 

409 1292 5C 

410 1293 E7 C4 

411 1295 20 DA 


INCmHL EQU 

JSR 1NDEX2 
LDB ,U 
INCB 

STB ,U 
BRA FLGINC 


INC (HL) 
Get (HL) 


413 


526 

527 1329 

528 132B 

529 132D 


1329 
96 89 
8D 02 
20 2D 


RRC 


EQU 

LDA WORK1 
BSR RRCs 
BRA STORE1 


531 132F RRCs 

532 132F 44 

533 1330 24 DE 

534 1332 8A 80 

535 1334 20 E3 


EQU 

LSRA 

BCC NCARY1 

ORA #*10000000 Set b7 

BRA CARY11 


537 1336 

538 1336 96 8A 

539 1338 8D 09 

540 133A 97 8A 

541 133C 39 


RLA EQU 

LDA A1 
BSR RLs 
STA A1 
RTS 


543 

544 133D 

545 133F 

546 1341 


133D 
96 89 
8D 02 
20 19 


RL 


EQU • 

LDA WORK1 
BSR RLs 
BRA STORE1 


548 1343 D6 8B RLs 

549 1345 54 

550 1346 49 

551 1347 RLs 1 

552 1347 RRs1 

553 1347 25 D0 

554 1349 20 C5 


LDB FI 

LSRB 

ROLA 

EQU 

EQU 

BCS CARY11 
BRA NCARY1 


Got Carry 


556 134B 

557 134B 96 8A 

558 134D 8D 03 

559 134F 97 8A 

560 1351 39 


RRA 


EQU 

LDA A1 
BSR RRs 
STA A1 
RTS 


415 1297 

416 1297 

417 1297 96 81 

410 1299 81 06 

419 129B 27 26 

420 129D E6 A6 

421 129F 5A 

422 12A0 E7 A6 

423 12A2 96 8B 

424 12A4 04 01 

425 12A6 8A 02 

426 12A8 Cl 7F 

427 12AA 26 02 

428 12AC 8A 04 

429 12AE 5D 

430 12AF 26 03 

431 12B1 8A 40 

432 12B3 5D 

433 12B4 2A 02 

434 12B6 8A 80 

435 12B8 C4 OF 

436 12BA Cl OF 

437 l2BC 26 02 

438 12BE 8A 10 

439 12C0 97 8B 

440 12C2 39 


COM0_5 EQU 

COMO D EQU 
LDA 
CMPA 
BEQ 

DECr LDB 
DECB 
STB 

FLGDEC LDA 
ANDA 
ORA 
CMPB 
BNE 
ORA 

NTPV2 TSTB 
BNE 
ORA 
TSTB 

NOTZ2 BPL 
ORA 

NOTS2 ANDB 
CMPB 
BNE 
ORA 

NOTH2 STA 
RTS 


DATA 2 
#$06 
DECaHL 

A.Y DEC r 

A.Y 

FI 

#*00000001 Keep Carry 
#*00000010 Set N 
#$7F 
NTPV2 

#*00000100 Set P/V 
NOTZ2 

#*01000000 Set Zero 
NOTS2 

#*10000000 Set Sign 

#$0F 

#$0F 

NOTH2 

#*00010000 Set HaIfCarry 
FI 


442 12C3 

443 12C3 9D 9D 

444 12C5 E6 C4 

445 12C7 5A 

446 12C8 E7 C4 

447 12CA 20 D6 


DECaHL EQU 

JSR INDEX2 
LDB .U 
DECB 

STB ,U 
BRA FLGDEC 


DEC (HL) 
Get (HL) 


449 


451 12CC 

452 12CC 

453 12CC D6 81 

454 12CE Cl 06 

455 12D0 27 09 

456 

457 12D2 

458 12D2 9E 9B 

459 12D4 A6 80 

460 12D6 9F 9B 

461 12D8 A7 A5 

462 12DA 39 

464 12DB 

465 12DB 9D 9D 

466 12DD 9E 9B 

467 12DF A6 80 

468 12E1 9F 9B 

469 12E3 A7 C4 

470 12E5 39 


COM0 6 EQU 

COMOlE EQU 

LDB DATA2 
CMPB #$6 
BEQ LDaHLn 

LDrn EQU 

LDX PC 
LDA ,X+ 

STX PC 
STA B.Y 
RTS 

LDaHLn EQU 

JSR INDEX2 
LDX PC 
LDA ,X+ 

STX PC 
STA ,U 
RTS 


LD r.n 

Get n 
Store r 

LD (HL).n 

Get n 

Store Data to (HL) 


562 1352 D6 8B RRs 

563 1354 54 

564 1355 46 

565 1356 20 EF 

567 1358 RR 

368 1358 96 89 

569 135A 8D F6 


LDB FI 

LSRB Get Carry 

RORA 

BRA RRsl 
EQU 

LDA W0RK1 
BSR RRs 


571 135C 

572 135C D6 82 

573 135E Cl 06 

574 1360 26 09 

575 1362 A7 C4 

576 1364 D6 OB 

577 1366 C4 01 

578 1368 4D 

579 1369 20 69 

580 136B 

581 136B A7 A5 

582 136D D6 8B 

583 136F C4 01 

584 1371 4D 

585 1372 20 60 


STORE1 EQU 
LDB 
CMPB 
BNE 
STA 
LDB 
ANDB 
TSTA 
BRA 

STrl EQU 
STA 
LDB 
ANDB 
TSTA 
BRA 


DATA3 

#$06 

STrl 

, 1 ) 

FI 

#*00000001 Carry is already Set 

N0TC3 

B.Y 

FI 

0*00000001 Carry is already Set 
NOTC3 


587 

588 1374 

589 1376 

590 1378 

591 137A 

592 137C 

593 137E 

594 137F 

595 1381 

596 1383 

597 1385 

598 

599 1387 

600 1389 

601 138B 

602 138D 

603 138F 

604 1391 

605 1392 

606 1394 

607 1395 

608 1397 

609 1398 

610 139A 

611 139C 

612 139E 

613 13A0 

614 13A2 

615 13A4 

616 13A6 

617 13AB 


D6 8B 
C5 02 
26 2E 
D7 89 
5F 

04 0F 
81 09 

23 02 
CA 10 

1387 
D7 8B 
D6 89 
C5 10 
26 03 
1C DF 
8E 
1A 20 
54 

96 8A 

19 

97 OA 
D6 8B 

24 02 
CA 01 
84 0F 
81 09 
23 2C 
C4 EF 

20 28 


DAA EQU 
LDA 
LDB 
BITB 
BNE 
STB 
CLRB 
ANDA 
CMPA 
BLS 
ORB 

NSETH1 EQU 
STB 
LDB 
BITB 
BNE 
ANDCC 
FCB 

SETH2 ORCC 
LSRB 

PAS2 LDA 

DAA 
STA 
LDB 
BCC 
ORB 

NOCDAA ANDA 
CMPA 
BLS 
ANDB 
BRA 


A1 Get Acc 

FI Get Flag 

#*00000010 Test N Flag 
AFTSUB 
W0RK1 

#$0F 

#9 Test b3 b2 bl b0 

NSETH1 

#*00010000 Set H Flag 
FI 

WORK1 

#*00010000 Test H Flag 
SETH2 

#*11011111 Clear H Flag (6809) 

$6E LDX # (for Skipping) 

#*00100000 Set H Flag (6809) 

Get Carry (HaIfCarry is 
A1 

A1 (Carry is not Move) 

FI (Carry is not Move) 

NOCDAA 

#*00000001 Sot Carry 

#$0F 

#$09 

NOHDAA 

#*11101111 Clear HalfCarry 
NOHDAA 


not Hove) 


472 


474 12E6 

475 12E6 

476 12E6 96 81 

477 12E8 48 

478 12E9 8E 12F0 

479 12EC AE 86 

480 12EE 6E 84 


COMO 7 EQU 
COM0 F EQU 

LDA DATA2 
A SLA 

LDX #JTB0_7 
LDX A.X 
JMP .X 


Get b5 b4 b3 
A=A*2 


482 12F0 

483 12F0 1300 

484 12F2 1322 

485 l2F4 1336 

486 12F6 134B 

487 12F8 1374 

488 12FA 1425 

489 12FC 141C 

490 12FE 142E 


JTB0_7 EQU 

FDB RLCA 
FDB RRCA 
FDB RLA 
FDB RRA 
FDB DAA 
FDB CPL 
FDB SCF 
FDB CCF 


492 

493 1300 

494 1302 

495 1304 

496 1306 


1300 

96 8A 
8D 09 

97 8A 
39 


RLCA 


STA 

RTS 


Get Acc 


498 

499 1307 

500 1309 

501 130B 


1307 
96 89 
OD 02 
20 4F 


RLC 


EQU 

LDA WORK1 
BSR RLCs 
BRA STORE1 


619 13AA 

620 13AA 0F 89 

621 13AC C5 10 

622 13AE 27 04 

623 13B0 

624 13B0 86 06 

625 13B2 97 89 

626 13B4 

627 13B4 C5 01 

628 13B6 27 06 

629 13B8 86 60 

630 13BA 9A 89 

631 13BC 97 89 

632 13BE C4 03 

633 13C0 00 89 

634 13C2 96 8A 

635 13C4 9B 89 

636 13C6 34 01 

637 13C8 97 8A 

638 13CA 35 02 

639 13CC 85 20 

640 13CE 27 02 

641 13D0 CA 10 

642 13D2 96 8A 

643 13D4 26 03 

644 13D6 CA 40 

645 13D8 4D 


AFTSUB EQU 
CLR 
BITB 
BEQ 

LOWADJ EQU 
LDA 
STA 

HIGH EQU 
BITB 
BEQ 
LDA 
ORA 
STA 

FLGDAA ANDB 
NEG 
LDA 
ADDA 
PSHS 
STA 
PULS 
BITA 
BEQ 
ORB 

NOHDAA LDA 

N0TC3 BNE 


• DAA after Subtract 

W0RK1 

#*00010000 Tost HalfCarry 
HIGH 

#$06 

W0RK1 

#*00000001 Test Carry 
FLGDAA 
#$60 


#*00000011 KEEP N and Carry 

W0RK1 

A1 

W0RK1 

CC 

A1 

A 

#*00100000 Test HalfCarry 
NOHDAA 

#*00010000 Set HalfCarry 
A1 

NOZDAA 

#*01000000 Set Zero 


646 13D9 2A 02 

647 13DB CA 80 

648 13DD 


NOZDAA BPL NOSDAA 

ORB #*10000000 Set Sign 
NOSDAA EQU 
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HE SENTINEL 


650 13DD 

651 13DD D7 69 

652 13DF 5F 

653 13E0 44 

654 13E1 24 02 

655 13E3 5C 

656 13E4 4D 

657 13E5 26 F9 

658 13E7 96 89 

659 13E9 C5 01 

660 13EB 26 02 

661 13ED 8A 04 

662 13EF 97 8B 

663 13F1 39 


PARI 


PARI 1 


PAR 12 


ODDI 


EQU 

STB 

CLRB 

LSRA 

BCC 

INCB 

TSTA 

BNE 

LDA 

BITB 

BNE 

ORA 

STA 


■ Parity Check A=Data B=Flag 

WORK1 Save Flag 

Clear Bit Counter 

PAR 12 


PARII If A=0 Then Check End 

WORK1 Rostore Flag 

*<*00000001 Even or Odd ? 

ODDI 

*<*00000100 Set P/V 
FI Store Flag 


665 13F2 SLA 

666 13F2 96 89 

667 13F4 48 

668 13F5 20 0F 


EQU 

LDA WORKl 
AS LA 

BRA FLGSFT 


797 149E D7 8A 

798 14A0 5F 

799 14A1 85 20 

800 14A3 27 02 

801 14A5 CA 10 

802 14A7 44 

803 14A8 24 02 

804 14AA CA 01 

805 14AC 44 

806 14AD 24 02 

807 14AF CA 04 

808 14B1 44 

809 14B2 24 02 

810 14B4 CA 40 

811 14B6 44 

812 14B7 24 02 

813 14B9 CA 80 

814 14BB D7 8B 

815 14BD 39 


STB 

CLRB 

BITA 

BEQ 


A1 

B=Flag 

*<*00100000 Te*t Half Carry 
NOTH5 

*<*00010000 Set HalfCarry 
Teat Carry 

NOTC5 

*<*00000001 Set Carry 

Teat OverFlow 

NOTV5 

*<*00000100 Set OverFlow 
Test Zero 

NOTZ5 

*<*01000000 Set Zero 

Test Negative 

NOTS5 

*<*10000000 Set Sign 
FI Store Flag 


670 13F7 SRA 

671 13F7 96 89 

672 13F9 47 

673 13FA 20 0A 


EQU 

LDA W0RK1 
ASRA 

BRA FLGSFT 


817 14BE ADC 

818 14BE D6 8B 

819 14C0 54 

820 14C1 20 D5 


EQU 

LDB FI 
LSRB 

BRA ADD1 


Get Carry 


675 


13FC 

SLL 

EQU 



676 

13FC 

96 89 


LDA 

W0RK1 


677 

13FE 

40 


ASLA 



670 

1 3FF 

8A 01 


ORA 

#*00000001 

(Carry ia not aove) 

b79 

1401 

20 03 


BRA 

FLGSFT 


601 


1403 

SRL 

EQU 

. 


602 

1403 

96 89 


LDA 

W0RK1 


603 

1405 

44 


LSRA 



685 


1406 

FLGSFT EQU 

. 


686 

1406 

IF A9 


TFR 

CC.B 


687 

1400 

C4 01 


ANDB 

#*00000001 

Get Carry 

600 

140A 

D7 89 


STB 

W0RK1 

Save Flag 

609 

140C 

D6 82 


LDB 

DATA3 


690 

1 40E 

Cl 06 


CMPB 

#$06 


691 

1410 

26 03 


BNE 

STr2 


692 

1412 

A7 C4 


STA 

.u 


693 

1414 

8E 


FCB 

$8E 

LDX « (For Skipping) 

694 


1415 

STr2 

EQU 

» 


695 

1415 

A7 A5 


STA 

B.Y 


696 


1417 

FLGST2 

EQU 

• 


697 

1417 

D6 89 


LDB 

W0RK1 

Reatore Flag 

690 

1419 

4D 


TSTA 


699 

141A 

20 B0 


BRA 

N0TC3 


701 


141C 

SCF 

EQU 

. 


702 

141C 

96 8B 


LDA 

FI 


703 

141E 

84 C4 


ANDA 

#*11000100 


704 

1420 

8A 01 


ORA 

#*00000001 

Set CARRY 

705 

1422 

97 8B 


STA 

FI 


706 

1424 

39 


RTS 



708 


1425 

CPL 

EQU 

. 


709 

1425 

03 8A 


COM 

A1 

I'a Coapleaent Acc 

710 

1427 

96 SB 


LDA 

FI 

Get Flag 

711 

1429 

8A 12 


ORA 

#*00010010 

Set N and H 

712 

142B 

97 8B 


STA 

FI 

Store Flag 

713 

142D 

39 


RTS 


715 


U2E 

CCF 

EQU 

. 


716 

142E 

96 8B 


LDA 

FI 


717 

1430 

85 01 


BITA 

#*00000001 


710 

1432 

26 07 


BNE 

RESCY 


719 

1434 

04 C4 


ANDA 

#211000100 

Reaet N 

720 

1436 

8A 01 


ORA 

*<*00000001 


721 

1430 

97 8B 


STA 

FI 


722 

143A 

39 


RTS 



723 

143B 

84 C4 

RESCY 

ANDA 

#211000100 


724 

143D 

97 8B 


STA 

FI 


725 

143F 

39 


RTS 



729 


1440 

C0L1 

EQU 


$40~$7F 

730 

1440 

96 81 


LDA 

DATA2 


731 

1442 

D6 82 


LDB 

DATA3 


732 

1444 

81 06 


CMPA 

#$06 


733 

1446 

27 10 


BEQ 

LDaHLr 


735 

1448 

Cl 06 


CMPB 

#$06 


736 

144A 

27 05 


BEQ 

LDraHL 


737 






LD r.a 

738 

144C 

E6 A5 


LDB 

B.Y 

Get a 

739 

144E 

E7 A6 


STB 

A.Y 


740 

1450 

39 


RTS 



742 


1451 

LDraHL 

EQU 

. 

LD r,(HL) 

743 

1451 

9D AF 


JSR 

INDEX3 


744 

1453 

E6 C4 


LDB 

.u 

Get (HL) 

745 

1455 

E7 A6 


STB 

A.Y 

746 

1457 

39 


RTS 



740 


1458 

LDaHLr 

EQU 


LD (HL).r 

749 

1458 

Cl 06 


CMPB 

#$06 


750 

USA 

27 00 


BEQ 

HALT 

Ignore HALT 

751 

145C 

IF 98 


TFR 

B.A 

752 

USE 

9D AF 


JSR 

INDEX3 


753 

1460 

A6 A6 


LDA 

A.Y 


754 

1462 

A7 C4 


STA 

,u 


755 

1464 

39 

HALT 

RTS 




757 


759 



1465 

COL2 

EQU 

• 

$60 _ $BF 

760 

1465 

96 

82 


LDA 

DATA3 


761 

1467 

81 

06 


CMPA 

#$06 


762 

1469 

26 

05 


BNE 

GETrl 


763 

146B 

9D 

9D 


JSR 

INDEX2 


764 

146D 

E6 

C4 


LDB 

.u 


765 

146F 


BE 


FCB 

$8E 

LDX # (for Skipping) 

766 

1470 

E6 

A6 

GETrl 

LDB 

A.Y 

767 

1472 

D7 

89 

JPC0L2 

STB 

W0RK1 


768 

1474 

96 

81 


LDA 

DATA 2 


769 

1476 

48 



ASLA 



770 

1477 

8E 

147E 


LDX 

#JTBL2 


771 

147A 

AE 

86 


LDX 

A.X 


772 

147C 

6E 

84 


JMP 

.X 


774 



147E 

JTBL2 

EQU 

. 


775 

147E 


1496 


FDB 

ADD 


776 

U00 


14BE 


FDB 

ADC 


777 

1482 


14C3 

a 

FDB 

SUB 


778 

1484 


14E5 


FDB 

SBC 


779 

1486 


150E 


FDB 

AND 


780 

1488 


1523 


FDB 

XOR 


781 

140A 


152C 


FDB 

OR 


782 

148C 


1535 


FDB 

CP 



822 14C3 

823 14C3 C6 02 

824 14C5 D7 8B 

825 14C7 D6 8A 

826 14C9 D7 00 

827 14CB D0 89 

828 14CD IF A8 

829 14CF D7 8A 

830 14D1 D6 89 

831 14D3 C4 0F 

832 14D5 D7 89 

833 14D7 D6 80 

834 14D9 C4 0F 

835 14DB D1 89 

836 14DD D6 8B 

837 14DF 24 C6 

838 14E1 CA 10 

839 14E3 20 C2 


SUB 


SBC1 


EQU 

LDB *<*00000010 
STB FI 

LDB A1 Get Acc 

STB DATA Save Acc before Subtract 

SUBB W0RK1 


SUBCP 


STB 

LDB 

ANDB 

STB 

LDB 

ANDB 

CMPB 

LDB 

BCC 


ORB 

BRA 


CC.A 

A1 

W0RK1 

<K$0F 

W0RK1 

DATA 

#$0F 

W0RK1 Teat HalfCarry 

FI (Carry is not aove) 

N0TH5 

*<*00010000 Set HalfCarry 
N0TH5 


841 14E5 

842 14E5 D6 8B 

843 14E7 C5 01 

844 14E9 27 D8 

845 14EB D6 8A 

846 14ED C4 0F 

847 14EF 27 03 

848 14F1 C6 02 

849 14F3 0E 

850 14F4 C6 12 

851 14F6 D7 0B 

852 14F8 D6 0A 

853 14FA C0 01 

854 14FC IF AB 

855 14FE D7 8A 

856 1500 D6 8B 

057 1502 44 

058 1503 24 02 

859 1505 CA 01 

060 1507 44 

861 1500 24 BB 

062 150A CA 04 

863 150C 20 B7 


SBC EQU 


BITB 


BEQ 

LDB 

ANDB 

BEQ 

LDB 

FCB 

HLFSET LDB 
STB 
LDB 
SUBB 
TFR 
STB 
LDB 
LSRA 
BCC 


NCC1 


LSRA 

BCC 

ORB 


BRA 


FI 

#*00000001 Teat CARRY 

SUB 

A1 

#$0F 

HLFSET 

#*00000010 

$8E LDX # (for Skipping) 

#*00010010 Set HalfCarry 
FI 
A1 

*<$01 Subtract Carry 

CC.A 

A1 

FI 

Teat Carry 

NCC1 

#*00000001 Set Carry 

Teat OverFlow 

#*00000100 Set OverFlow 
SBC] 


065 150E 

866 150E 96 8A 

067 1510 94 09 

860 1512 97 8A 

869 1514 C6 10 

870 1516 4D 

871 1517 26 03 

872 1519 CA 40 

073 151B 4D 

074 151C 2A 02 

875 151E CA 80 

876 1520 7E 13DD 


AND EQU 
LDA 
ANDA 
STA 
LDB 

FLGLOG TSTA 
BNE 
ORB 
TSTA 

N0TZ7 BPL 
ORB 

N0TS7 JMP 


* AND r or (HL) 

A1 

W0RK1 

A1 

#$10 B=Flag < H(f1 eg) = 1) 

N0T27 

#*01000000 Set Zero 
N0TS7 

#*10000000 Set Sign 
PARI 


870 

879 1523 
000 1525 
081 1527 
002 1529 
883 152A 


1523 

96 0A 
98 09 

97 8A 
5F 

20 EA 


XOR 


EQU 

LDA 

EORA 

STA 

CLRB 

BRA 


A1 

W0RK1 

A1 

FLGLOG 


B»Flag 


885 152C 

886 152C 96 8A 

887 152E 9A 89 

800 1530 97 8A 

889 1532 5F 

890 1533 20 El 


OR 


EQU 

LDA 

ORA 

STA 

CLRB 

BRA 


A1 

W0RK1 

A1 

FLGLOG 


892 1535 

893 1535 C6 02 

894 1537 D7 8B 

895 1539 D6 BA 

896 153B D7 00 

097 153D D0 09 

890 153F IF A8 

899 1541 20 8E 


CP 


EQU 

LDB #*00000010 
STB FI 
LDB A1 

STB DATA Store Acc before Subtract 

SUBB W0RK1 
TFR CC.A 
BRA SUBCP 


901 


903 1543 

904 1543 96 80 

905 1545 84 0F 

906 1547 46 

907 1548 8E 154F 

908 154B AE 86 

909 154D 6E 84 


C0L3 


EQU 

LDA DATA 
ANDA #$0F 
ASLA 

LDX #JTBL3 
LDX A.X 
JHP .X 


911 154F 

912 154F 156F 

913 1551 15BE 

914 1553 1615 

915 1555 1670 

916 1557 16A6 

917 1559 1701 

918 155B 140E 

919 155D 1719 

920 155F 156F 

921 1561 15DC 

922 1563 1615 

923 1565 1670 

924 1567 16A6 

923 1569 179D 

926 156B 148E 

927 156D 1719 


JTBL3 EQU 

FDB COM3 0 
FDB COM3 1 
FDB COM3_2 
FDB COM3 3 
FDB COM3 4 
FDB COM3 5 
FDB COM3~6 
FDB COM3 7 
FDB COM3 8 
FDB COM3 9 
FDB C0M3~A 
FDB COM3 B 
FDB COM3 - C 
FDB C0M3 - D 
FDB COM3 E 
FDB C0M3_F 


929 


784 148E 

785 148E 

786 148E 9E 9B 

787 1490 E6 80 

780 1492 9F 9B 

789 1494 20 DC 


C0M3_6 EQU 
COM3 E EQU 

LDX PC 
LDB ,X+ 

STX PC 
BRA JPC0L2 


ADD A.nISUB nIAND nIOR n 
ADC A.nISBC A.nIXOR nICP n 


Get n 


791 1496 

792 1496 1C FE 

793 

794 1498 D6 8A 

795 149A D9 89 

796 149C IF A8 


ADD EQU 

ANDCC #*111111 

ADD1 LDB A1 

ADCB W0RK1 
TFR CC,A 


Clear Carry (6809) 
ADD A.r or (HL) 
(Carry is not aove) 


931 156F 

932 156F 

933 156F 96 8B 

934 1571 D6 81 

935 1573 58 

936 1574 8E 157B 

937 1577 AE 85 

938 1579 6E 84 


940 157B 

941 157B 1596 

942 157D 159B 

943 157F 15A0 


COM3 0 EQU 
COM3 8 EQU 

LDA FI 
LDB DATA2 
AS LB 

LDX #JTB3 
LDX B.X 
JMP .X 

JTB3_0 EQU 

FDB RETNZ 
FDB RETZ 
FDB RETNC 
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944 1581 

945 1583 

946 1585 

947 1587 

948 1589 

950 

951 158B 

952 158D 

953 158F 

954 1591 

955 1593 

956 1595 

958 

959 1596 

960 1598 

961 159A 

963 

964 159B 

965 159D 

966 159F 


969 15A0 

970 15A2 

971 15A4 

973 

974 15A5 

975 15A7 

976 15A9 


979 15AA 

980 15AC 

981 15AE 

983 

904 15AF 

985 15B1 

986 15B3 


989 15B4 

990 15B6 

991 15B8 

993 

994 15B9 

995 15BB 

996 15BD 


1000 

1001 15BE 

1002 15C0 

1003 15C2 

1004 

1005 15C4 

1006 15C6 

1007 15C8 

1008 15CA 

1009 15CC 

1010 15CE 

1011 1SD0 

1013 

1014 15D1 

1015 15D3 

1016 15D5 

1017 15D7 

1018 1509 

1019 15DB 

1021 

1023 

1024 15DC 

1025 15DE 

1026 15E0 

1027 15E3 

1028 15E5 

1030 

1031 15E7 

1032 15E9 

1033 15EB 

1034 15ED 


15A5 
15AA 
15AF 
15B4 
15B9 

158B 
9E 99 
EC 81 
9F 99 
D7 9B 
97 9C 
39 

1596 
85 40 
27 FI 


159B 
85 40 
26 EC 


15A0 
85 01 
27 E7 


15A5 
85 01 
26 E2 


15AF 
85 04 
26 D8 


15B4 
85 80 
27 D3 


15B9 
85 80 
26 CE 


27 0D 

33 A6 
9E 99 
EC 81 
9F 99 
E7 C4 
A7 41 
39 

15D1 
9E 99 
EC 81 
9F 99 
07 8A 
97 8B 


RETC 

RETPO 

RETPE 

RETP 

RETM 


39 


1036 

1037 

1038 

1039 

1040 

1041 

1042 

1043 

1044 

1045 

1046 

1047 

1048 


15EF 
15F3 
15F6 
15F8 
15FA 
15FC 
15FE 
1600 
1602 
1604 
1606 
160A 


1050 

1051 160B 

1052 160D 

1053 160F 

1055 

1056 1610 

1057 1612 

1058 1614 

1060 

1062 

1063 

1064 1615 

1065 1617 

1066 1619 

1067 161A 

1068 161D 

1069 161F 

1071 

1072 1621 

1073 1623 

1074 1625 

1075 1627 

1076 1629 

1077 162B 

1078 162D 

1079 162F 

1081 

1082 1631 

1083 1633 

1084 1635 

1085 1637 

1086 1639 

1088 

1089 163A 

1090 163C 


FDB 

FOB 

FDB 


EQU 

LDX 

LDD 

STX 

STB 

STA 

RTS 


BITA 71*01000000 

BNE RET 

RTS 

EQU 

BITA 1>*00000001 
BEQ RET 


EQU 

BITA 1**00000100 
BEQ RET 


EQU 

BITA 1**00000100 
BNE RET 


EQU 

BITA 1**10000000 
BEQ RET 


EQU 

BITA 1**10000000 
BNE RET 


Pop Return Address 


COM3_l EQU 
LDA 
CMPA 


LEAU 

LDX 

LDD 

STX 

STB 

STA 

RTS 

EQU 

LDX 

LDD 

STX 

STB 

STA 

RTS 


DATA2 

K$06 

POPAF 


8E 15E7 
AE 86 
6E 84 

15E7 
158B 
15EF 
160B 
1610 

15EF 
108E 1083 
8E 100C 
C6 03 
D7 89 
EC A4 
EE 84 
ED 81 
EF A1 
0A 89 
26 F4 
108E 1083 
39 


COM3_9 EQU 
LDA 
ANDA 
LDX 
LDX 
JMP 

JTB3.9 EQU 


DATA2 

11*00000110 
<*JTB3 9 
A.X 
.X 


1610 
DC 87 
DD 99 


1615 
1615 
96 8B 
D6 81 


6E 84 

1621 

163A 

1640 

1646 

164C 

1652 

1658 

165E 

1664 

1631 
9E 9B 
E6 84 
A6 01 


163A 
85 40 
27 F3 


EXX EQU 
LOT 
LDX 
LDB 
STB 

EXXLOP LDD 
LDU 
STD 
STU 
DEC 
BNE 
LDV 
RTS 

JPaHL EQU 
LDD 
STD 
RTS 

LDSPHL EQU 
LDD 
STD 
RTS 


RET 

EXX 

JPaHL 

LDSPHL 


,X++ 

. Y++ 
WORKl 
EXXLOP 


COM3 2 EQU 
COM3~A EQU 
LDA 
LDB 
AS LB 
LDX 
LDX 
JMP 

JTB3_2 I 


FDB 

FDB 

FDB 


EQU 

LDX 

LDB 

LDA 

STD 

RTS 


JPNZ 

JP2 

JPNC 

JPC 

JPPO 

JPPE 

JPP 

JPM 


1091 

163E 

20 28 


BRA 

SKIP2 



1093 


1640 

JPZ 

EQU 

. 



1094 

1640 

85 40 


BITA 

***01000000 



1095 

1642 

26 ED 


BNE 

JP 



1096 

1644 

20 22 


BRA 

SKIP2 



1098 


1646 

JPNC 

EQU 




1099 

1646 

85 01 


BITA 

***00000001 



1100 

1648 

27 E7 


BEQ 

JP 



1101 

164A 

20 1C 


BRA 

SKIP2 



1103 


164C 

JPC 

EQU 

. 



1104 

164C 

85 01 


BITA 

***00000001 



1105 

164E 

26 El 


BNE 

JP 



1106 

1650 

20 16 


BRA 

SKIP2 



1108 


1652 

JPPO 

EQU 

« 



1109 

1652 

85 04 


BITA 

***00000100 



1110 

1654 

27 DB 


BEQ 

JP 



1111 

1656 

20 10 


BRA 

SKIP2 



1113 


1658 

JPPE 

EQU 

. 



1114 

1658 

85 04 


BITA 

***00000100 



1115 

165A 

26 D5 


BNE 

JP 



1116 

165C 

20 0A 


BRA 

SKIP2 



1118 


165E 

JPP 

EQU 

. 



1119 

165E 

85 80 


BITA 

***10000000 



1120 

1660 

27 CF 


BEQ 

JP 



1121 

1662 

20 04 


BRA 

SKIP2 



1123 


1664 

JPH 

EQU 




1124 

1664 

85 80 


BITA 

***10000000 



1125 

1666 

26 C9 


BNE 

JP 



1127 


1668 

SKIP2 

EQU 

. 



1128 

1668 

DC 9B 


LDD 

PC 



1129 

166A 

C3 0002 


ADDD 

<*2 



1130 

166D 

DD 9B 


STD 

PC 



1131 

1133 

166F 

39 


RTS 











1135 


1670 

COM3 3 

EQU 

. 



1136 


1670 

COM3~B 

EQU 

• 



1137 

1670 

96 81 


LDA 

DATA 2 



1138 

1672 

48 


AS LA 


A=A*2 


1139 

1673 

BE 167A 


LDX 

<*JTB3 3 



1140 

1676 

AE 86 


LDX 

A.X 



1141 

1678 

6E 84 


JMP 

,X 



1143 


167A 

JTB3_3 

EQU 




1144 

167A 

1631 


FDB 

JP 



1145 

167C 

17B0 


FDB 

COM CB 



1146 

167E 

1188 


FDB 

INnA 

Ignore 

IN n, A 

1147 

1680 

1188 


FDB 

OUTAn 

Ignore 

OUT A.n 

1148 

1682 

168A 


FDB 

EaSPHL 



1149 

1684 

169D 


FDB 

EXDEHL 



1150 

1686 

115C 


FDB 

DI 



1151 

1688 

11SC 


FDB 

El 



1153 


168A 

EbSPHL 

EQU 

. 



1154 

168A 

9E 99 


LDX 

SP 



1155 

168C 

E6 64 


LDB 

.X 



1156 

168E 

A6 01 


LDA 

1 .X 



1157 

1690 

9E 87 


LDX 

HI 



1158 

1692 

DD 87 


STD 

HI 



1159 

1694 

IF 10 


TFR 

X.D 



1160 

1696 

9E 99 


LDX 

SP 



1161 

1698 

E7 84 


STB 

.X 



1162 

169A 

A 7 01 


STA 

1 .X 



1163 

169C 

39 


RTS 




1165 


169D 

EXDEHL 

EQU 




1166 

169D 

9E 87 


LDX 

HI 



1167 

169F 

DC 85 


LDD 

Dl 



1160 

16A1 

DD 87 


STD 

HI 



1169 

16A3 

9F 85 


STX 

Dl 



1170 

1172 

16AS 

39 


RTS 





16A6 

COM3 4 

EQU 




1174 

1175 


16A6 

COM3_C 

EQU 




1176 

16A6 

96 81 


LDA 

DATA2 



1177 

16A0 

48 


AS LA 




1178 

16A9 

BE 16B0 


LDX 

*»JTB3 4 



1179 

16AC 

AE 86 


LDX 

A.X 



1160 

16AE 

6E 84 


JMP 

.X 



1182 


16B0 

JTB3_4 

EQU 

• 



1183 

16B0 

16D3 


FDB 

CALLNZ 



1184 

16B2 

16DB 


FDB 

CALLZ 



1165 

16B4 

16E3 


FDB 

CALLNC 



1186 

16B6 

16EB 


FDB 

CALLC 



1187 

16B8 

16F3 


FDB 

CALLPO 



1188 

16BA 

16FB 


FDB 

CALLPE 



1189 

16BC 

1703 


FDB 

CALLP 



1190 

16BE 

170B 


FDB 

CALLM 



1192 


16C0 

CALL 

EQU 

« 

CALL m 


1193 

16C0 

9E 9B 


LDX 

PC 



1194 

16C2 

E6 80 


LDB 

.X+ 

Get nn 


1195 

16C4 

A6 80 


LDA 

,x+ 



1196 

16C6 

DD 9B 


STD 

PC 



1197 

16C8 

DE 99 

CALL1 

LDU 

SP 



1198 

16CA 

IF 10 


TFR 

X.D 



1199 

16CC 

A7 C2 


STA 

,-U 

Push Return Address 

1200 

16CE 

E7 C2 


STB 

,-u 



1201 

16D0 

DF 99 


STU 

SP 



1202 

16D2 

39 


RTS 




1204 


16D3 

CALLNZ 

EQU 

. 



1205 

16D3 

96 8B 


LDA 

FI 



1206 

16D5 

65 40 


BITA 

***01000000 



1207 

16D7 

27 E7 


BEQ 

CALL 



1208 

16D9 

20 36 


BRA 

SKIP22 



1210 


16DB 

CALLZ 

EQU 

. 



1211 

16DB 

96 8B 


LDA 

FI 



1212 

16DD 

85 40 


BITA 

***01000000 



1213 

16DF 

26 DF 


BNE 

CALL 



1214 

16E1 

20 2E 


BRA 

SKIP22 



1216 


16E3 

CALLNC 

EQU 




1217 

16E3 

96 OB 


LDA 

FI 



1218 

16E5 

85 01 


BITA 

***00000001 



1219 

16E7 

27 D7 


BEQ 

CALL 



1220 

16E9 

20 26 


BRA 

SKIP22 



1222 


16EB 

CALLC 

EQU 




1223 

16EB 

96 8B 


LDA 

FI 



1224 

16ED 

85 01 


BITA 

*<*00000001 



1225 

16EF 

26 CF 


BNE 

CALL 



1226 

16F1 

20 IE 


BRA 

SKIP22 



1228 


16F3 

CALLPO 

EQU 

• 



1229 

16F3 

96 8B 


LDA 

FI 



1230 

16F5 

85 04 


BITA 

***00000100 



1231 

16F7 

27 C7 


BEQ 

CALL 



1232 

16F9 

20 16 


BRA 

SKIP22 



1234 


16FB 

CALLPE 

EQU 

. 



1235 

16FB 

96 8B 


LDA 

FI 



1236 

16FD 

85 04 


BITA 

***00000100 



1237 

16FF 

26 BF 


BNE 

CALL 
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HE SENTINEL 


1238 1701 20 0E 


1240 

1241 1703 

1242 1705 

1243 1707 

1244 1709 

1246 

1247 170B 

1248 170D 

1249 170F 

1251 

1252 1711 

1253 1713 

1254 1716 

1255 1718 

1257 

1259 

1260 

1261 1719 

1262 171B 

1263 171D 

1264 171F 

1265 1722 

1266 1724 

1267 1725 

1268 1727 

1269 1729 

1271 

1272 172D 

1273 172C 

1274 Y720 

1275 172E 

1276 172F 

1277 1730 

1278 1731 

1279 1732 

1281 

1282 1733 

1283 1735 

1284 1737 

1285 1739 

1286 173B 

1287 173D 

1288 1740 

1289 1742 

1290 1744 

1291 1746 

1292 1749 

1293 174B 

1294 174D 

1295 1750 

1296 1752 

1297 1754 

1298 1756 

1299 1758 

1300 175A 

1301 175D 

1302 175F 

1303 1761 

1304 1763 

1305 1765 

1306 1767 

1307 1769 

1308 176B 

1309 

1310 176D 

1311 176F 

1312 1771 

1313 1773 

1315 

1317 

1318 1774 

1319 1776 

1320 1778 

1321 177A 

1322 177C 

1323 177E 

1324 1780 

1326 

1328 

1329 1781 

1330 1783 

1331 1785 

1332 

1333 1787 

1334 1789 

1335 178B 

1336 178D 

1337 178F 

1338 1791 

1340 

1341 1792 

1342 1794 

1343 1796 

1344 1798 

1345 179A 

1346 179C 

1348 

1350 

1351 179D 

1352 179F 

1353 17A1 

1354 17A4 

1355 17A6 

1357 

1358 17A8 

1359 17AA 

1360 17AC 

1361 17AE 

1363 

1365 

1366 17B0 

1367 17B2 

1368 17B4 

1369 17B6 

1370 17B8 

1371 17BA 

1372 17BC 

1373 17BE 

1374 17BF 

1375 17C1 

1376 17C3 

1377 17C5 

1378 17C8 

1379 17CA 

1381 

1382 17CC 

1383 17CE 

1384 17D0 


1703 
96 8B 
85 80 
27 B7 
20 06 

170B 
96 8B 
85 80 
26 AF 

1711 
DC 9B 
C3 0002 


1719 
1719 
96 81 
81 01 
27 14 
8E 172B 
E6 86 
4F 

9E 9B 
DD 9B 
20 9D 


BRA SKIP22 

CALLP EQU 

LDA FI 

BITA 0X10000000 


CALLH EQU 

LDA FI 

BITA 0210000000 
BNE CALL 

SKIP22 EQU 

LDD PC 
ADDD 02 
STD PC 
RTS 


38 

1733 
35 10 
9E 9B 
A6 80 
9F 9B 
DE 99 
B7 0002 
IF 10 
A7 C2 
E7 C2 
8E 1099 
C6 02 
8D 27 
BE 1089 
C6 03 
8D 20 
D6 8A 
96 8B 
ED C3 
8E 1092 
C6 03 
BD 13 
D6 93 

96 94 
ED C3 
ED C3 
DF 99 
35 08 

00 
IF 30 
D7 80 

97 81 


10 

1774 
D7 89 
A6 82 
E6 82 
ED C3 
0A 89 
26 F6 
39 


1781 
96 81 
81 06 
27 0B 

EC A6 
9E 99 
A7 82 
E7 82 
9F 99 
39 

1792 
D6 8A 
96 8B 
9E 99 
ED 83 
9F 99 
39 


179D 
96 81 
84 06 
8E 17A8 
AE 86 
6E 84 

17A8 

16C0 

183B 

1899 

1856 


17B0 
9D CB 

34 04 
96 82 
81 06 
26 05 
9D 9D 
E6 C4 

8E 
E6 A6 
D7 89 

35 02 
8E 17CC 
AE 86 
6E 84 

17CC 

17D4 

17EE 

1816 


COM3 7 EQU 
COM3 F EQU 
LDA 


LDX 

LDB 

CLRA 

LDX 

STD 

BRA 


FCB 

FCB 

FCB 

FCB 

FCB 

FCB 

FCB 


RST08H 
0RSTTBL 
A, X 


$00 

$08 

$10 

$18 

$20 

$28 

$30 

$38 


RESTART 

Return to 6809 


LDX 

LDA 

STX 

LDU 

STA 

TFR 

STA 

STB 

LDX 

LDB 

BSR 

LDX 

LDB 

BSR 

LDB 

LDA 

STD 

LDX 

LDB 

BSR 

LDB 

LDA 

STD 

STD 

STU 

PULS 

SETDP 

TFR 

STB 

STA 

RTS 


RSTSUB EQU 
STB 

RSTLOP LDA 
LDB 
STD 
DEC 
BNE 
RTS 


> FUNCNO 
X , D 


U.D 

ZSTKPT 

ZSTKPT+1 


Drop Return Address 

PUSH PC 

PUSH 1Y.IX 
PUSH HL.DE.BC 

PUSH AF 

PUSH HL’,DE',BC' 


Store Stack Pointer 
Return to 6809 


BEQ PUSHAF 

LDD A, Y 
LDX SP 
STA ,-X 
STB .-X 
STX SP 
RTS 


PUSHAF EQU 
LDB 
LDA 
LDX 
STD 
STX 
RTS 


COM3 D EQU 
LDA 
ANDA 
LDX 
LDX 
JMP 


DATA2 
0200000110 
0JTB3 D 
A, X 


CALL 
COM DD 
COM ED 
COM FD 


COM CB EQU 
JSR 
PSHS 
LDA 


JSR 

LDB 

FCB 

GETr2 LDB 

JPCMCB STB 
PULS 
LDX 
LDX 
JMP 


INDEX2 
.U 
$8E 
A , Y 
WORK 1 


LDX 0 (for Skipping) 


SHIFT 

BIT 

RES 


1385 17D2 

1387 

1388 17D4 

1389 17D6 

1390 17D7 

1391 17DA 

1392 17DC 

1394 

1395 17DE 

1396 17E0 

1397 17E2 

1398 17E4 

1399 17E6 

1400 17E8 

1401 17EA 

1402 17EC 

1404 

1405 17EE 

1406 17F0 

1407 17F2 

1408 17F5 

1409 17F7 

1410 17F9 

1411 17FB 

1412 17FD 

1413 17FF 

1414 1801 

1415 1802 

1416 1804 

1417 1806 

1418 1808 

1419 180A 

1421 

1422 180B 

1423 1B0D 

1424 180F 

1425 1812 

1426 1814 

1428 

1429 1816 

1430 1618 

1431 161A 

1432 181D 

1434 

1435 181F 

1436 1821 

1437 1823 

1438 1825 

1439 1827 

1440 

1441 1828 

1442 182A 

1444 

1445 182B 

1446 182C 

1447 182D 

1448 182E 

1449 182F 

1450 1830 

1451 1831 

1452 1832 

1454 

1455 1833 

1456 1834 

1457 1835 

1458 1836 

1459 1837 

1460 1838 

1461 1839 

1462 183A 

1464 

1466 

1467 183B 

1468 183D 

1469 183F 

1470 1841 

1471 1843 

1472 1845 

1473 1847 

1474 1849 

1475 184B 

1476 184D 

1477 184F 

1478 1851 

1479 1853 

1480 1855 

1482 

1483 1856 

1484 1858 

1485 1B5A 

1486 185C 

1487 185E 
I486 1860 

1489 1862 

1490 1864 

1491 1866 

1492 1868 

1493 186A 

1494 186C 

1495 186E 

1496 1870 

1498 

1499 1871 

1500 1873 

1501 1875 

1502 1877 

1503 1879 

1504 187B 

1505 187D 

1506 187F 

1507 1881 

1508 1884 

1509 1886 

1510 1888 

1511 188A 

1512 188C 

1513 188E 

1515 

1516 188F 

1517 1892 

1518 1894 

1519 1896 

1520 1890 

1522 

1524 

1525 1899 

1526 189B 


1529 18A3 

1530 18A4 

1531 18A7 


BE 17DE 
AE 86 
6E 84 

17DE 
1307 
1329 
133D 
1358 
13F2 
13F7 
13FC 
1403 

17EE 
96 89 
D6 81 
8E 182B 
A5 85 
26 09 
06 8B 
C4 01 
CA 50 
D7 8B 
39 

D6 8B 
C4 01 
CA 10 
D7 8B 


96 89 
D6 81 
8E 182B 
AA 85 
20 09 

1816 
96 89 
D6 81 
8E 1833 
A4 85 

181F 
D6 82 
Cl 06 
26 03 
A 7 C4 
39 


FDB SETBIT 

SHIFT EQU 

LDA DATA2 
A SLA 

LDX 0JSHIFT 
LDX A,X 
JMP .X 

JSHIFT EQU 

FDB RLC 
FDB RRC 
FDB RL 


LDX 0BITMSK 
BITA B.X 
BNE FLGBT1 
LDB FI 

ANDB 0X000O0001 Keep Carry 

ORB 0X01010000 Set Ha IfCarry and Zero 

STB FI 

RTS 

FLGBT1 LDB FI 

ANDB 0X00000001 


RTS 

SETBIT EQU 

LDA W0RK1 
LDB DATA2 
LDX 0BITMSK 
ORA 


B.X 

BRA ST0RE2 

RES EQU • 

LDA W0RK1 
LDB DATA2 
LDX 0RESMSK 
ANDA B.X 

ST0RE2 EQU 

LDB DATA3 
CMPB 0$06 
BNE STr3 
STA ,U 


STr3 


EQU 
STA 
RTS 

BITMSK EQU 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 


RESMSK EQU 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 


$10 

$20 

$40 

$80 


$FE 

SFD 

$FB 

$F7 

$EF 

$DF 

$BF 

$7F 


BIT 7 

BIT 0 


183B 
0C 92 
9D CB 
Cl 02 
27 4C 
9E 95 
DE 87 
9F 87 
DF 95 
8D 24 
9E 95 
DE 87 
9F 87 
DF 95 
39 

1856 
03 92 
9D CB 
Cl 02 
27 31 
9E 97 
DE 87 
9F 87 
DF 97 
8D 09 
9E 97 
DE 87 
9F 87 
DF 97 
39 

1871 
96 80 
81 CB 
26 18 
9E 9B 
EC 84 
E7 84 
A7 01 

34 10 
BD 17B0 

35 10 
EC 84 
E7 84 
A 7 01 
0F 92 
39 

188F 
8E 110E 
AE 85 
AD 84 
0F 92 
39 


COM DD EQU 

INC INDEX 
JSR GETDTA 
CMPB 02 


COM FD EQU 

COM INDEX 
JSR GETDTA 
CMPB 02 


LDU HI 
STX HI 
STU IY 


LDU HI 
STX HI 
STU IY 
RTS 


DD FD EQU 
LDA 
CM PA 
BNE 
LDX 
LDD 
STB 
STA 
PSHS 
JSR 
PULS 
LDD 
STB 
STA 
CLR 
RTS 

NOT CB EQU 
LDX 
LDX 
JSR 
CLR 
RTS 


DATA 
0$CB 
NOT CB 


COM ED EQU 

JSR GETDTA 
CMPB 0$04 
LBEQ REPEAT 
LDA DATA3 
AS LA 

LDX 0JTB_ED 
LDX A,X 
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1532 18A9 6E 84 


1534 

1535 18AB 

1536 18AD 

1537 18AF 

1538 18B1 

1539 18B3 

1540 16B5 

1541 18B7 

1542 18B9 

1545 18BB 

1546 18BD 

1547 18BF 

1548 18C1 

1549 18C3 

1550 18C5 

1551 18C7 

1552 18C9 

1553 18CA 

1554 18CC 

1555 18CE 

1556 18D0 


18AB 
115C 
115C 
10BB 
1952 
1941 
158B 
115C 
1A98 

18BB 
06 81 
C5 01 
IF Afl 
C4 06 
Cl 06 

26 03 
DE 99 

8E 
EE A5 
DF 80 
IF 8A 

27 42 


FDB 

FOB 

FDB 

FDB 

FDB 

FDB 

FDB 


PORT 

PORT 

SBCADC 

LDanrp 

NEG 

RET 

IH012 

RRDRLD 


Ignore IN A.(C) 
Ignore OUT A.(C) 


SBCADC EQU 
LDB 
BITB 
TFR 
ANDB 
CHPB 
BNE 
LDU 
FCB 

GETssl LDU 
STU 

SKPSAD TFR 


DATA 2 
#£00000001 
CC, A 

#£00000110 
#$06 
GET#si 
SP 
$8E 
B.Y 
DATA 
A.CC 
SBCss 


LDX « (for Skipping) 


1558 18D2 

1559 18D2 D6 8B 

1560 18D4 54 

1561 18D5 24 17 

1562 18D7 DC 87 

1563 18D9 C3 0001 

1564 18DC 34 01 

1565 18DE DD 87 

1566 18E0 35 02 

1567 18E2 5F 

1568 18E3 44 

1569 18E4 24 02 

1570 18E6 CA 01 

1571 18E8 44 

1572 18E9 24 04 

1573 18EB CA 04 

1574 18ED 21 


ADCs# EQU 
LDB 
LSRB 
BCC 
LDD 
ADDD 
PSHS 
STD 
PULS 
CLRB 
LSRA 
BCC 
ORB 

NOCADC LSRA 
BCC 
ORB 
FCB 


FI 

ADDs# 

HI 

#1 

CC 

HI 

A 


ADC HL.s# 
Test Carry 


Add Carry 


Test Carry 

NOCADC 

#£00000001 Sot Carry 

Test OverFlow 

ADDss2 

#£00000100 Set OverFlow 

$21 BRN (for Skipping) 


1679 1991 C5 01 

1680 1993 27 14 


BITB #£00000001 
BEQ LD? 


1682 

1683 1995 

1684 1997 

1685 1999 

1686 199A 

1687 199D 

1688 199F 


1995 
D6 81 
C4 03 
58 

8E 19A1 
AE 85 
6E 84 


CP? 


EQU 

LDB DATA2 
ANDB #£00000011 
AS LB 

LDX #JTBCP? 

LDX B.X 


1690 

1691 19A1 

1692 19A3 

1693 19A5 

1694 19A7 


19A1 JTBCP? EQU 
19BD FDB CPI 

19C7 FDB CPD 

1A0B FDB CPIR 

1A15 FDB CPDR 


1696 19A9 

1697 19A9 D6 81 

1698 19AB C4 03 

1699 19AD 58 

1700 19AE 8E 19B5 

1701 19B1 AE 85 

1702 19B3 6E 64 


LD? 


LDB 

ANDB 

ASLB 

LDX 

LDX 

JMP 


DATA 2 
#£00000011 

#JTBLD? 

B.X 

.X 


1704 

1705 19B5 

1706 19B7 

1707 19B9 

1708 19BB 


19B5 
1A22 
1A30 
1A51 
1A72 


FDB 


LDI 

LDD 

LDIR 

LDDR 


1710 19BD 

1711 19BD 9E 87 

1712 19BF E6 80 

1713 19C1 D7 89 

1714 19C3 9F 87 

1715 19C5 20 0A 


CPI EQU • 

LDX HI 
LDB ,X+ 
STB W0RK1 
STX HI 
BRA CP?? 


Get HL 
Get (HL) 


1717 19C7 

1718 19C7 9E 87 

1719 19C9 E6 84 

1720 19CB D7 89 

1721 19CD 30 IF 

1722 19CF 9F 87 


CPD EQU 

LDX HI 
LDB .X 
STB W0RK1 
LEAX -l.X 
STX HI 


Get HL 
Get (HL) 

HL*HL-1 


1576 1 BEE 5F 

1577 18EF D7 8B 

1578 18F1 DC 87 

1579 18F3 D3 80 

1580 18F5 34 01 

1581 18F7 DD 87 

1582 18F9 35 02 

1583 18FB D6 8B 

1584 18FD 44 

1585 18FE 24 02 

1586 1900 CA 01 

1587 1902 44 

1588 1903 24 02 

1589 1905 CA 04 

1590 1907 44 

1591 1908 24 02 

1592 190A CA 40 

1593 190C 44 

1594 190D 24 02 

1595 190F CA 80 

1596 1911 D7 8B 

1597 1913 39 


ADDss CLRB 

ADDss2 STB 
LDD 
ADDD 
PSHS 
STD 
PULS 

FLGSUB LDB 

FLGSBC LSRA 
BCC 
ORB 

NOTC8 LSRA 
BCC 
ORB 

NOTV8 LSRA 
BCC 
ORB 

NOTZ8 LSRA 
BCC 
ORB 

N0TS8 STB 
RTS 


FI 

HI Get ss 

DATA 

CC 

HI Store HL 

A 

FI 

Tost Carry 

N0TC8 

#£00000001 Set Carry 

Test OverFlow 

NOTV8 

#£00000100 Set P/V 

Test Zero 

NOTZ8 

#£01000000 Set Zero 

Tost Negative 

NOTS8 

#£10000000 Set Sign 
FI 


1599 1914 

1600 1914 D6 8B 

1601 1916 54 

1602 1917 24 18 

1603 1919 DC 87 

1604 191B 83 0001 

1605 191E 34 01 

1606 1920 DD 87 

1607 1922 35 02 

1608 1924 C6 02 

1609 1926 44 

1610 1927 24 02 

1611 1929 CA 01 

1612 192B 44 

1613 192C 24 05 

1614 192E CA 04 

1615 1930 BE 


SBCss EQU 
LDB 
LSRB 
BCC 
LDD 
SUBD 
PSHS 
STD 
PULS 
LDB 
LSRA 
BCC 
ORB 

NOCSBC LSRA 
BCC 
ORB 
FCB 


• SBC HL.sa 

FI 

Test Carry 

SUBss 

HI 

#1 

CC 

HI 

A 

#£00000010 

Test Carry 

NOCSBC 

#£00000001 

Test OverFlow 

SUBss2 

#£00000100 Set P/V 

$8E LDX # (for Skipping) 


1617 1931 C6 02 

1618 1933 D7 8B 

1619 1935 DC 87 

1620 1937 93 80 

1621 1939 34 01 

1622 193B DD 87 

1623 193D 35 02 

1624 193F 20 BA 


SUBss LDB 
SUBss2 STB 
LDD 
SUBD 
PSHS 
STD 
PULS 
BRA 


#£00000010 Set N 


1626 1941 

1627 1941 D6 8A 

1628 1943 00 8A 

1629 1945 IF A0 

1630 1947 C4 0F 

1631 1949 26 03 

1632 194B 5F 

1633 194C 20 AF 

1634 194E C6 20 

1635 1950 20 AB 


NEG EQU 

LDB A1 
NEG A1 
TFR CC.A 
ANDB #$0F 
BNE SETHLF 
CLRB 

BRA FLGSBC 

SETHLF LDB #£00100000 Set HalfCarry 
BRA FLGSBC 


1637 

1638 1952 

1639 1954 

1640 1956 

1641 1958 

1642 195A 

1643 195C 

1644 195E 

1645 1961 

1646 1962 

1647 1964 

1648 1966 


1952 
D6 81 
C5 01 

34 01 
C4 06 
Cl 06 
26 04 
CE 1099 

8E 
33 A5 

35 01 
26 11 


LDanrp EQU 
LDB 
BITB 
PSHS 
ANDB 
CHPB 


BNE 

LDU 

FCB 

GETss2 LEAU 
SKPLDa PULS 
BNE 


DATA 2 
#£00000001 

CC 

#£00000110 
#$06 
GETss2 
#SP 

$8E LDX # (for Skipping) 

B.Y 

CC 

LDddan 


1650 1968 

1651 1968 9E 9B 

1652 196A E6 80 

1653 I960 A6 00 

1654 196E 9F 9B 

1655 1970 IF 01 

1656 1972 EC C4 

1657 1974 E7 84 

1658 1976 A7 01 

1659 1978 39 


LDandd EQU 

LDX PC 
LDB ,X+ 
LDA .X+ 
STX PC 
TFR D.X 
LDD .U 
STB ,X 
STA l.X 
RTS 


LD dd.(nn) 

Get nn 

Get dd 

Store to (nn) 


1661 1979 LDddan EQU 

1662 1979 9E 9B LDX 

1663 197B E6 80 LDB 

1664 197D A6 80 LDA 

1665 197F 9F 9B STX 

1666 1981 IF 01 TFR 

1667 1983 EC 84 LDD 

1668 1985 E7 C4 STB 

1669 1987 A7 41 STA 

1670 1989 39 RTS 


PC 
,X+ 
• X* 
PC 
D.X 
.X 
.U 
1 ,U 


LD (nn).dd 
Get nn 


Get (nn) 
Store to dd 


1672 

1673 198A 

1674 198C 

1675 198E 

1676 1990 


198A REPEAT EQU 
D6 82 LDB DATA3 

C5 02 BITB #£00000010 

27 01 BEQ MEM 

39 RTS Port (INIR, OTDR and 


on) 


1678 1991 MEM EQU 


Heaory 


1724 19D1 96 8A 

1725 19D3 97 80 

1726 19D5 91 89 

1727 19D7 IF A8 

1728 19D9 D6 89 

1729 19DB C4 0F 

1730 19DD D7 89 

1731 19DF D6 80 

1732 19E1 C4 0F 

1733 19E3 D1 89 

1734 19E5 D6 8B 

1735 19E7 C4 01 

1736 19E9 CA 02 

1737 19EB 24 02 

1738 19ED CA 10 

1739 19EF 85 08 

1740 19F1 27 02 

1741 19F3 CA 80 

1742 I9F5 85 04 

1743 19F7 27 02 

1744 19F9 CA 40 

1745 19FB 9E 83 

1746 19FD 30 IF 

1747 19FF 9F 83 

1748 1A01 27 02 

1749 1A03 CA 04 

1750 1A05 D7 8B 

1751 1A07 39 


CP?? 


NOTH9 


NOTS9 


NOTZ9 


NOTV9 


LDA 

STA 

CMPA 

TFR 

LDB 

ANDB 

STB 

LDB 

ANDB 

CMPB 

LDB 

ANDB 


ORB 

BCC 

ORB 

BITA 

BEQ 

ORB 

BITA 


ORB 

LDX 

LEAX 

STX 


A1 Get Acc 

DATA Save Acc before Subtract 

WORK1 A-(HL) 

CC.A Save Flag 

WORK1 

#$0F 

WORKl 

DATA 

#$0F 

WORK1 

FI (Carry is not move) 

#£00000001 Keep Carry (Carry is not aove) 
#£00000010 Set N (Carry is not aove) 

N0TH9 

#£00010000 Set Half 
#£00001000 Test Negative 
NOTS9 

#£10000000 Set Sign 
#£00000100 Test Zero 
NOTZ9 

#£01000000 

B1 

-l.X 

B1 

NOTV9 

#£00000100 Set V 
FI 


1753 

1754 1A08 

1755 1A0A 

1756 1A0C 

1757 1A0E 

1758 1A10 

1759 1A12 

1760 1A14 


1A08 
8D B3 
D6 8B 
C5 40 
26 04 
C5 04 
26 F4 
39 


CPIR EQU 

BSR CPI 
LDB FI 

BITB #£01000000 Test Zero 
BNE RETCP Return If A=(HL) 

BITB #£00000100 Test P/V 
BNE CPIR Repeat If BC<>0 

RETCP RTS 


1762 1A15 

1763 1A15 8D B0 

1764 1A17 D6 8B 

1765 1A19 C5 40 

1766 1A1B 26 F7 

1767 1 AID C5 04 

1768 1A1F 26 F4 

1769 1A21 39 


CPDR 


EQU 

BSR CPD 
LDB FI 

BITB #£01000000 Test Zero 

BNE RETCP Return If A«(HL> 

BITB #£00000100 Test P/V 

BNE CPDR Repeat If BC<>0 

RTS 


1771 

1772 1A22 

1773 1A24 

1774 1A26 

1775 1A28 

1776 1A2A 

1777 1A2C 

1778 1A2E 


1A22 
9E 85 
DE 87 
A6 C0 
A7 80 
9F 85 
DF 87 
20 10 


LDI 


EQU 

LDX 

LDU 

LDA 

STA 

STX 

STU 

BRA 


D1 

HI 

.U+ 

,X+ 

D1 

HI 

LD?? 


Get Destination 
Get Source 


1780 

1781 1A30 

1782 1A32 

1783 1A34 

1784 1A36 

1785 1A38 

1786 1A3A 

1787 1A3C 

1788 1A3E 

1789 1A40 

1790 1A42 

1791 1A44 

1792 1A46 

1793 1A48 

1794 1A4A 

1795 1A4C 

1796 lA4E 

1797 1A50 


1A30 
9E 85 
DE 87 
A6 C4 
A7 84 
30 IF 
33 5F 
9F 85 
DF 87 
D6 SB 
C4 Cl 
9E 83 
30 IF 
9F 83 
27 02 
CA 04 
D7 8B 
39 


LDX 

LDU 

LDA 

STA 

LEAX 

LEAU 

STX 

STU 

LDB 

ANDB 

LDX 

LEAX 

STX 


Get Byte Count 


1799 

1800 IASI 

1801 1A53 

1802 1A55 

1803 1A58 

1804 1ASA 

1805 1A5C 

1806 1A5E 

1807 1A60 

1808 lA62 

1809 1A64 

1810 1A67 

1811 1A6B 

1812 1A6D 

1813 lA6F 

1814 1A71 


DE 85 
109E 87 
A6 A0 
A 7 C0 
30 IF 
26 F8 
9F 83 
DF 85 
109F 87 
108E 1083 

96 8B 
84 Cl 

97 8B 
39 


LDIR EQU 
LDX 
LDU 
LDY 

LDILOP LDA 
STA 
LEAX 
BNE 
STX 
STU 
STY 
LDY 
LDA 
ANDA 
STA 
RTS 


B1 Counter 

D1 Destination 

HI Source 

, Y+ 

,U+ 

-1 .X 
LDILOP 
B1 
D1 
HI 

#REGTOP 

FI 

#£11000001 

FI 


1816 1A72 

1817 1A72 9E 83 

1818 1A74 DE 85 

1819 1A76 109E 87 

1820 1A79 31 21 

1821 1A7B 33 41 

1822 lA7D A6 A2 

1823 1A7F A7 C2 

1824 1A81 30 IF 

1825 1A83 26 F8 


LDDR EQU 

LDX B1 
LDU D1 
LDY HI 
LEAY l.Y 
LEAU l.U 
LDDLOP LDA ,-Y 
STA .-U 
LEAX -l.X 
BNE LDDLOP 


Counter 

Destination 

Source 


156 Oh! MZ 1987.8. 


► X68000, XI. MZ-2500 {> MZ-1500C/Zo X lOOO*^ PCG l 1 kWh 

h Q LTHA ? J!(i ft (16) MBH 




HE SENTINEL 


1826 1A85 31 3F 

1827 1A87 33 5F 

1828 1A89 9F 83 

1829 1A8D DF 85 

1830 1A8D 109F 87 

1831 1A90 108E 1083 

1832 1A9A 96 8B 

1833 1A96 84 Cl 

1834 1A98 97 8B 

1835 1A9A 39 


LEAY —1,Y 
LEAU -1.0 
STX B1 
STU 01 
STY HI 
LDY #REGTOP 
LDA Fl 

ANDA 1000O01 
STA Fl 
LDAIR RTS 


1864 1AC7 C4 F0 

1865 1AC9 54 

1866 1ACA 54 

1867 1ACB 54 

1868 1 ACC 54 

1869 1ACD EA 84 

1870 1ACF E7 84 

1871 1ADI D6 8B 

1872 1AD3 C4 01 

1873 1 ADS 7E 1516 


ANDB 0$F0 

LSRB 

LSRB 

LSRB 

LSRB 

ORB ,X 
STB .X 
LDB Fl 

ANDB 0X00000001 Keep Carry 
J(IP FLGLOG 


1837 1A9B 

1838 1A9B D6 81 

1839 1A9D C5 04 

1840 1A9F 27 F9 

1841 1AA1 C5 02 

1842 1AA3 26 F5 

1843 1AA5 C5 01 

1844 IAA7 27 2F 


RRDRLD 


EQU 

LDB 

BITB 

BEQ 

BITB 

BNE 

BITB 

BEQ 


DATA2 

0X100 

LDAIR 

0X010 

LDAIR 

0X001 

RRD 


Ignore LD A.I.LD A,R and 

777 


1847 1AA9 9E 87 

1848 1AAB 96 8A 

1849 1AAD IF 89 

1650 1AAF 84 F0 

1851 1AB1 97 89 

1852 1AB3 68 84 

1853 1AB5 59 

1854 1AB6 68 84 

1855 1 ABO 59 

1856 1AB9 68 84 

1857 1 ABB 59 

1858 1ABC 68 84 

1859 1ABE 59 

1860 1ABF IF 98 

1861 1AC1 84 0F 

1862 1AC3 9A 89 

1863 1ACS 97 8A 


EQU 

LDX HI 
LDA A1 
TFR A.B 
ANDA «$F0 
STA WORKl 
ASL ,X 
ROLB 
ASL ,X 
ROLB 
ASL ,X 
ROLB 
ASL ,X 
ROLB 

TFR B.A 
ANDA 0S0F 
ORA WORK1 
STA A1 


Get HL 


Keep b7~b4 


1876 1ADO 9E 87 

1877 1 ADA 96 8A 

1870 1ADC IF 89 

1879 1ADE C4 F0 

I860 1AE0 D7 89 

1881 1AE2 44 

1882 1AE3 66 84 

1883 1AE5 46 

1884 1AE6 66 84 

1885 1AES 46 

1886 1AE9 66 84 

t887 1AEB 46 

1888 1AEC 66 84 

1889 1AEE 46 

1890 1AEF 44 

1891 1AF0 44 

1892 1AF1 44 

1893 1AF2 44 

1894 1AF3 9A 89 

1895 1AF5 97 8A 

1896 1AF7 D6 8B 

1897 1AF9 C4 01 

1896 1AFB 7E 1516 


EQU • 

LDX HI 
LDA A1 
TFR A ,B 

ANDB <i$F0 Keep b7“b4 

STB WORK1 

LSRA 

ROR ,X 
RORA 

ROR ,X 
RORA 

ROR ,X 
RORA 

ROR ,X 
RORA 


LSRA 

LSRA 

ORA WORK1 
STA A1 
LDB Fl 

ANDB 0X00000001 
JHP FLGLOG 


1900 


1AFD EHUEND EQU ’-1 


'J*H3 xuu-j'fflfMv-X'JXl 


1 0893 

2 10E9 

3 10F1 

4 1015 

5 2100 


IRQBRK EQU $0893 
Z80 EQU S10E9 
PC0000 EQU S10F1 
CNDHDL EQU $1015 
HOT EQU $2100 


ORG $0878 


27 103B 20 D8 BRA CNDHDL 


29 103D 

30 103D 34 OA 

31 103F 4F 

32 1040 IF 8B 

33 1042 17 F84E 

34 1045 35 0A 

35 1047 3B 


IRQPAT EQU 

PSHS DP,A 
CLRA 

TFR A.DP 
LBSR IRQBRK 
PULS DP,A 
RTI 


11 0870 16 07BD 

12 

13 0686 


LBRA CMDENT 
ORG $0886 


ORG $1B1F 


15 0886 7E 103D 

16 

17 08B8 


JNP IRQPAT 
ORG $08B8 


40 1B1F C3 

41 1B20 00 

42 

43 1E4F 


FCB $C3 1 JP HOT 

FCB <HOT,>HOT 

ORG $1E4F 


19 08B8 39 

20 

21 1033 


RTS 

ORG $1033 


23 1033 BD 10E9 

24 1036 20 DD 


JSR 280 Sleep 6809 6 Return 280 

BRA CHDHDL 


26 1030 BD 10F1 CNDENT JSR PC0000 


45 1E4F 

46 1E50 

47 

48 1F8E 


C3 FCB $C3 * JP HOT 

00 FCB <HOT,)HOT 


ORG $1F8E 


50 1F8E C3 

51 1F8F 00 


FCB $C3 • JP HOT 

FCB <HOT,>HOT 


'JXH4 


0000 

0000 

0000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 I 1 30 32 
3003 CD F.5 IF 
3006 FD 5B 76 IK 
3O0A CD 1)3 IF 
3001) 1A 
30OK KB IB 

3010 C8 

3011 

3011 CD B2 IF 
3014 38 EA 
3016 22 7B 32 
3019 11 43 32 
301C CD E5 IF 
301F CD 27 30 
3022 CD 1)4 30 
3025 18 1)9 
3027 
3027 

3027 21 00 04 
302A CD IE 20 
302D 2A 7B 32 
3030 OB 10 
3032 CD 3D 30 
3035 CD EE IF 

3038 OD 

3039 20 F7 
303B 18 24 
303D 

303D 

3031) E5 

303F. CD BF. IF 

3041 El 

3042 06 08 
3044 IE 00 
3046 CD Fl IF 
3049 7B 

304A 23 


1 ; MACHINE CODE INPUT TOOL 


i \ 

3 OFFSET 

4 ORG 

5 ; 

6 *HLHEX EQU 

7 sPRTHL EQU 

8 SPRTHX EQU 

9 tGKTL KQl 
10 *MSX KQl 
1 1 #LETNI. EQU 

12 »PRNTS EQU 

13 *?R1NT EQU 

14 #CSRSET EQU 

15 »FLGKT EQU 

16 ; 

17 *KBFAl) EQU 

18 

19 START: 

20 LD 

21 CALL 

22 LD 

23 CAUL 

24 LD 

25 CP 

26 RET 

27 ; 

28 CAUL 

29 JR 

30 LD 

31 LD 

32 CAUL 

33 CALL 

34 CALL 

35 JK 

36 ; 

37 DUMP: 

38 LD 

39 CALL 

40 LD 

41 LD 

42 DUMP1: CAUL 

43 CALL 

4 4 DEC 

45 JR 

46 JR 

47 ; 

48 LNDMP: 

49 PUSH 

50 CALL 

51 POP 

52 LD 

53 LD 

54 LNDMP1: CAUL 

55 LD 

56 INC 


3000H 

300011 

1FB2H 
1 FUEH 
IFC1H 
IFD3H 
I FI-511 
I FKKH 
1FF1H 
1FF4H 
20 I Ell 
2021H 

IF76H 


DE,OPN1NG 

• MSX 

DE,<*KHFAD) 

• GKTI. 

A, I l)E) 

1BH 

7. 

*111.HEX 
C, START 
(ADRS) .HI. 
DK,TITLE 
•MSX 
DUMP 
KKYIN 
START 


HL.0400H 

tCSRSKT 

HL.(ADRS) 

C, 16 

LNDMP 

•LETNL 

C 

NZ.DLMP1 

COLSUM 


HL 

•PRTHL 

HL 


K, 0 

•PRNTS 
A,(HL) 
HL 


304B 57 
304C CD Cl IF 
304F 
304F 7A 

3050 83 

3051 5F 

3052 

3052 10 F2 
3054 CD Fl IF 
3057 3E 3A 

3059 CD F4 IF 
305C 7B 

305D CD Cl IF 

3060 C9 

3061 
3061 

3061 21 00 14 
3064 CD IE 20 
3067 06 20 

3069 3E 2D 
306B CD F4 IF 
306E 10 FB 

3070 CD EE IF 
3073 

3073 11 75 32 
3076 CD E5 IF 
3079 

3079 2A 7B 32 
307C 0E 08 
307E 

307E 06 10 

3080 II 08 00 
3083 AF 

3034 86 

3085 19 

3086 10 FC 
3088 

3088 CD Cl IF 
30BB CD Fl IF 
308E 11 7F 00 

3091 B7 

3092 ED 52 

3094 OD 

3095 20 E7 
3097 

3097 3E 3A 
3099 C9 
309A 

309A CD F4 IF 
309D 2A 7B 32 
30AO 06 80 
30A2 
30A2 56 
30A3 5A 
30A4 23 
30A5 05 


57 LD 

58 CALL 

59 

60 1.D 

61 ADD 

62 LD 

63 ; 

64 DJNZ 

65 CALL 

66 LD 

67 CALL 

68 LD 

69 CALL 

70 RET 

71 

72 COLSUM: 

73 LD 

74 CALL 

75 LD 

76 LD 

77 CLSM1: CALL 

78 DJNZ 

79 CALL 

80 ; 

81 LD 

82 CALL 

83 ; 

84 LD 

85 LD 

86 ; 

87 CLSM3: LD 

88 LD 

89 XOR 

90 CLSM4: ADD 

91 ADD 

92 DJNZ 

93 ; 

94 CALL 

95 CALL 

96 LD 

97 OR 

98 SBC 

99 DEC 

100 JR 

101 ; 

102 LD 

103 RET 

104 ; 

105 CALL 

106 LD 

107 LD 

108 CRC: 

109 LD 

110 LD 

111 INC 

112 DEC 


I), A 

•PRTHX 


A, E 
E, A 

LNDMP1 
•PRNTS 
A, ’ : ’ 
•PRINT 
A, E 
•PRTHX 


HL, 1400II 
•CSRSET 

B, 32 

A, 

•PRINT 

CLSMI 

•LETNL 

DE.MES 
• MSX 

HL,(ADRS) 

C, 8 

B, 16 
DE, 8 
A 

A,(HL) 

HL, DE 
CLSM4 

•PRTHX 
•PRNTS 
DE.127 
A 

HL, DE 
C 

NZ.CLSM3 
A, •: • 


•PRINT 
HL,(ADRS) 

B, 128 

D, (HL) 

E, D ; dummy 

HL 

B 




m* wm (is) 


FM-7/77K& S-OS “SWORD" 157 


30A6 28 27 
30A8 
30A8 SE 
30A9 23 
30AA 05 
30AB 28 22 
30AI) 

30AD D5 
30AK IE 80 
301)0 09 


3OH2 D9 
30B3 
30B3 7E 
30B4 A3 
30B5 28 01 
30B7 37 
30B8 
30B8 DU 
30B9 ED 6A 
30BB 30 08 
30B0 

30BD 3E 10 
30BF AC 
30C0 67 
30C1 3E 21 
30C3 AD 
30C4 6F 
30C5 
30C5 D9 
30C6 CB OB 
30C8 

30C8 30 EB 

3OCA 23 

30CB 10 E6 

30CD DU 

30CK EB 

30CF 

30CF EB 

30D0 CD BE IF 

3003 C9 

30D4 

301)4 

30D4 21 05 04 
30D7 22 7D 32 
30DA 

30DA 2A 7D 32 
301)1) CD IE 20 
30E0 CD 21 20 
30E3 0) 19 00 
30E6 21 CA 31 
30E9 ED B1 
30EB 20 ED 
30ED 

30ED FE 30 
30EF 30 34 
30F1 

30F1 FE 1C 
30F3 38 26 
30F5 

30F5 20 05 
30F7 

30F7 CD 71 31 
30FA 18 DE 
30FC 

30FC FE ID 
30FE 20 05 
3100 

3100 CD 94 31 
3103 18 D5 
3105 

3105 FE IE 
3107 20 09 
3109 

3109 06 10 

31 OB CD 94 31 
310K 10 FB 

3110 18 C8 
3112 

3112 06 10 
3114 CD 71 31 
3117 10 FB 

3119 18 BF 
31 IB 

31 IB 21 7D 32 
31 IE FE OD 

3120 CO 

3121 36 05 
3123 18 B5 
3125 

3125 FE 54 
3127 20 OE 
3129 

3129 2A 7B 32 
312C 11 80 00 
312F B7 

3130 El) 52 
3132 22 7B 32 
3135 18 OE 
3137 

3137 FE 47 
3139 20 OF 
313B 

313B 2A 7B 32 
313E II 80 00 

3141 19 

3142 22 7B 32 
3145 

3145 CD 27 30 
3148 18 8A 
314A 

314A FE 52 
314C 20 05 
314E 

314E CD 61 30 
3151 18 81 
3153 

3153 CD E3 31 
3156 2A 7D 32 
3159 2E 00 
315B CD IE 20 
315E 

315E CD 27 32 

3161 5F 

3162 16 00 
3164 2A 7B 32 

3167 19 

3168 

3168 CD 3D 30 
316B CD 71 31 
316E C3 DA 30 
3171 
3171 

3171 C5 

3172 21 7D 32 
3175 3E IB 

3177 BE 

3178 20 05 
317A 

317A CD 89 31 
317D 18 08 
317F 7E 

3180 34 

3181 CD B7 31 
3184 20 01 

3186 34 

3187 Cl 

3188 C9 


113 JR 

114 ; 

115 CD 

116 INC 

117 DEC 

1 18 JR 

119 ; 

120 CRC1: PUSH 

121 CD 

122 EXX 

123 POP 

124 EXX 

125 ; 

126 CRC2: LD 

127 AND 

128 JR 

129 SCF 

130 ; 

131 CRC3: EXX 

132 ADC 

133 JR 

134 ; 

135 LD 

136 XOR 

137 LD 

138 LD 

139 XOR 

140 LD 

141 ; 

142 CRC4: EXX 

143 RKC 

144 

145 JR 

146 INC- 

147 DJNZ 

148 EXX 

149 EX 

150 ; 

15 1 DUMPS: EX 

152 CALL 

153 RET 

154 

155 KEVIN: 

156 LD 

157 LD 

158 ; 

159 KEYINl: LD 

160 CALL 

161 CALL 

162 LD 

163 LD 

164 CPIR 

165 JR 

166 ; 

167 CP 

168 JR 

169 ; 

170 CP 

171 JR 

172 ; 

173 CSHR: JR 

174 { 

175 CALL 

176 JR 

177 ; 

178 CSRL: CP 

179 JR 


Z.DUNP5 

B, (HI.) 

HL 

B 

Z.DUMP5 ; case of bytes < 3 

DE ; first 16 bits 

E . 8011 ; mask pattern 

IIL ; first 16 bits 


A, (1IL) ; load I byte 

E ; get. bit 

Z.CRC3 ; CY=0 
; CY= 1 


HL.HL ; add the bit to HL 
NC.CRC4 ; non 16th bit 

A, 1011 
H 

Hi A 

A.21H ; 1021H=X*12+X'5+1 

L 

L,A ; I1L = HL XOR 1021H 


E ; rotate musk pattern 

; to get. next bit 

NC.CRC2 ; case of loop =< 8 

HL : next byte 

CHC2 


DE i HL 
fPRTIIL 


HL.04O5H 

ILOCl.HL 

HL,(LOCI 

•CSRSBT 

IFLCET 

BC.25 

HL.KYTBl. 

NZ.KEVINl 


NC.UDKEY 

1CH 

C.SPCKY 

NZiCSRL 

C8RRGT 

KEYINl 

1DH 

NZ.CSRU 


180 ; 

181 CALL 

182 JR 

183 ; 

184 CSRU: CP 

185 JR 

186 ; 

187 LD 

188 CSRUl: CALL 

189 DJNZ 

190 JR 

191 ; 

192 CSRD: LD 

193 CSRDI: CALL 

194 DJNZ 

195 JK 

196 ; 

197 SPCKY: LD 

198 CP 

199 RET 

200 LD 

201 JR 

202 ; 

203 UDKEY: CP 

204 JR 

205 

206 LD 

207 LD 

208 OR 

209 SBC 

210 LD 

211 JR 

212 ; 

213 UDKEY1: CP 

214 JR 

215 ; 

216 LD 

217 LD 

218 ADD 

219 LD 

220 ; 

221 UDKEY2: CALL 

222 JR 

223 ; 

224 RSTORE: CP 

225 JR 

226 ; 

227 CALL 

228 JR 

229 ; 

230 EDIT: CALL 

231 LD 

232 LD 

233 CALL 

234 

235 CALL 

236 LD 

237 LD 

238 LD 

239 ADD 

240 ; 

241 CALL 

242 CALL 

243 JP 

244 

245 CSRROT: 

246 PUSH 

247 LD 

248 LD 

249 CP 

250 JR 

251 ; 

252 CALL 

253 JR 

254 CSRRT1: LD 

255 INC 

256 CALL 

257 JR 

258 INC 

259 CSRRT2: POP 

260 RET 


CSRLFT 

KEYINl 

l EH 

NZ,CSRD 

B, 16 
CSRLFT 
CSRUl 
KEYINl 

B, 16 
CSRRGT 
CSRD1 
KEYINl 

HL,LOC 

ODH 

NZ 

(HL),5 
KEYINl 


>T . 

NZ,UDKEY1 

HL,(ADRS) 
DK,128 
A 

HL, DE 
(ADRS),HL 
UDKEY2 

•0* 

NZ.RSTORE 

HL.(ADRSI 
DE,128 
HL.DE 
(ADRS) ,H1. 

DUMP 

KEYIN 

•R* 

NZ,EDIT 

COLSl'M 

KEYIN 

EDITION 
HL,(LOC) 
L, 0 

tCSKSET 

YOFST 
E, A 
D, 0 

HL,(ADRS) 
HL.DF. 

LNDMP 

CSRROT 

KEYINl 


BC 

Hl., LOC 
A,27 
(HL) 

NZ.CSRRT1 

NXLN 
CSRRT2 
A, (HL) 
(HL) 

LOCHK 

NZ.CSRRT2 

(HL) 

BC 


3189 

3189 36 05 
3181) 23 
318C 7E 
318D 34 
318E FE 13 

3190 CO 

3191 

3191 36 04 

3193 C9 

3194 
3194 

3194 C5 

3195 21 7D 32 
3198 3E 05 
319A BE 
319B 20 05 
319D 

319D CD AC 31 
31 AO 18 08 
31A2 7E 
3 1 A3 35 
31A4 CD B7 31 
31A7 28 01 
31A9 35 
31AA Cl 
31AB C9 
31 AC 

31 AC 36 IB 
31AK 23 
31AF 7E 
31B0 35 
31B1 FE 04 
31B3 C0 
31B4 

3IB4 36 13 
31B6 C9 
31B7 
31B7 
31B7 E5 
31B8 01 08 00 
31BB 21 C2 31 
3 I BE ED B1 
3ICO El 
31C1 CU 
31C2 

31C2 06 09 OC OF 
31C6 12 15 IB IB 
31CA 

31CA OD IB 
3ICC 1C ID IE IF 
311)0 30 31 32 33 
3104 34 35 36 37 
31D8 38 39 41 42 
31 DC 43 44 45 46 
31EO 54 47 52 
31E3 
31E3 

31E3 CD IF 32 
31F.6 47 
31E7 CD 27 32 
31EA 4F 
31 EB 
31EB C5 
3 1 EC 3A 7D 32 
31KF 1)6 05 
31F1 01 03 00 
31F4 91 
31F5 38 03 
31F7 04 
31F8 18 FA 
3 1 FA 
3 1 FA 78 
31 FB Cl 
31FC 81 
31FD 
31FD 5F 
31FE 16 00 
3200 2A 7B 32 

3203 19 

3204 

3204 3A 7D 32 

3207 C5 

3208 CD B7 31 
320B Cl 
320C 7F. 

320D 20 05 
320F 

320F K6 F0 

3211 B0 

3212 18 09 
3214 E6 OF 

3216 4F 

3217 78 

3218 87 

3219 87 
321A 87 
321B 87 
321C B1 
321D 77 
32IE C9 
321F 

321F D6 30 
3221 FE 0A 

3223 D8 

3224 

3224 D6 07 

3226 C9 

3227 
3227 

3227 3A 7E 32 
322A D6 04 
322C 87 
322D 87 
322E 87 
322F C9 
3230 

3230 OC 

3231 49 4E 50 55 
3235 54 20 53 54 
3239 41 52 54 20 
3231) 4 1 44 52 63 
3241 OD 00 
3243 

3243 0C 

3244 44 55 4D 50 
3248 20 26 20 45 
324C 44 49 54 

324F OD 0D 384 

3251 41 44 52 53 385 

3255 20 2B 30 20 
3259 2B 31 20 2B 
325D 32 20 2B 33 
3261 20 2B 34 20 
3265 2B 35 20 2B 
3269 36 20 2B 37 
326D 20 3A 53 55 

3271 4D 

3272 0D OD 386 

3274 00 387 

3275 388 

3275 53 55 4D 3A 389 

3279 20 

327A 00 390 

327B 391 

327B 00 90 392 

327D 00 OO 393 

OBJECT CODE END 627E 


261 

262 

263 

264 

265 

266 

267 

268 

269 

270 
27 t 

272 

273 

274 

275 

276 

277 

278 

279 

280 
281 
282 

283 

284 

285 

286 

287 

288 

289 

290 

291 

292 

293 

294 

295 

296 

297 

298 

299 

300 

301 

302 

303 

304 

305 

306 

307 

308 

309 

310 

311 

312 

313 

314 

315 

316 

317 

318 

319 

320 

321 

322 

323 

324 

325 

326 

327 

328 

329 

330 

331 

332 

333 

334 

335 

336 

337 

338 

339 

340 

341 

342 

343 

344 

345 

346 

347 

348 

349 

350 

351 

352 

353 

354 

355 

356 

357 

358 

359 

360 

361 

362 

363 

364 

365 

366 

367 

368 

369 

370 

371 

372 

373 

374 

375 

376 

377 

378 

379 


380 

381 

382 

383 


CSRLFT: 

PUSH 

LD 

LD 

CP 

JR 

CALL 

JR 

CSLFT1: LD 
DEC 
CALL 
JR 
DEC 

CSLFT2: POP 
RET 

BFRLN: LD 

INC 
LD 
DEC 
CP 
RET 

LI) 

RET 

LOCHK: 

PUSH 

LD 

LD 

CPIR 

POP 

RET 

MOTN: DEFB 

DEFB 

KYTBL: DEFB 

DEFB 
DEFB 
DEFB 
DBFB 
DEFB 
DEFB 


EDITION: 

CALL 

LD 

CALL 

LD 

PUSH 

LD 

SUB 

LD 

EDTION1:SUB 
JR 
INC 
JR 

EDTIN11:LD 
POP 
ADD 

LD 

LD 

LD 

ADD 

LD 

PUSH 

CALL 

POP 

LD 

JR 

AND 

OR 

JR 

HDTION2:AND 
LD 
LD 
ADD 
ADD 
ADD 
ADD 
OR 

EDTION3:LD 
RET 

TOHEX! SUB 
CP 
RET 

SUB 

RET 

YOFST: 

LD 

SUB 

ADD 

ADD 

ADD 

RET 


OPNINO: DEFB 
DEEM 


DEFB 


TITLE: 


MES: DKFM 

DEFB 

ADRS: DKFW 

LOC: DEFW 


(HL),5 
HL 

A,(HL) 
(HL) 

19 

NZ 

(HL),4 


BU¬ 
HL, LOC 
A,5 
(HL) 

NZ.CSLFT1 

BFRLN 
CSLFT2 
A,(HL) 
(HL) 

LOCHK 

Z.CSLFT2 

(HL) 

BC 


(HL),27 
HL 

A,(HL) 
(Hl.) 

4 

NZ 

(HL),19 


HL 
BC, 8 
IIL, MOTN 

HL 


6,9,12,15 

18,21,24,27 

ODH,1BH 

1CH.1DH.1EH.1FH 
’O’ , ' 1*.'Z',*3' 
■4',*5','6’,* 7’ 
'8',’9’,'A’,’B’ 
'C',*D’,’E’, 'F 1 
•T’,*G’,*R' 


TOHEX 

B. A 
YOFST 

C, A 

A ( , (LOC) 

6 

BC, 3 
C 

C,EDT1Nil 
B 

EDTION1 

A, B 
BC 
A.C 


B, A 
D, 0 

HL,(ADRS) 
HL.DE 

A,(LOC) 

BC 

LOCHK 

BC 

A,(HL) 
NZ.EDTION2 

0F0H 

B 

EDTION3 

00FII 

C, A 
A,B 
A, A 
A,A 
A,A 
A, A 
C 

(HL),A 


■0’ 

10 

C 


(LOC*1) 

A 

A 


OCH 

"INPUT START ADRS" 


ODH, 0 
OCH 

"DUMP A EDIT" 


ODH,ODH 

"ADRS *0 +1 +2 +3 +4 +5 +6 +7 :SUM" 


0 

9000H 

0 


158 Oh! MZ 1987.8. 
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HE SENTINEL 


Initial Program Loader for S-OS SWORD 
Version 1.1 1906/05/25 

Designed and coded by S.Kigoshi 


FD03 

FD05 

FD05 

FD0F 


0001 

0002 

0004 

0005 

0006 

0007 


63 

64 

65 0371 

66 0373 

67 0375 
60 0377 
69 0379 


96 05 
2B FC 
06 00 

97 05 
96 05 


$FD03 

SFD05 

$FD05 

5FD0F 


FE08 DREADS EQU SFE00 


RQNO 1 
RCBSTA I 
RCBDBA I 
RCBTRK 1 
RCBSCT 1 
RCBSID I 
RCBUNT 1 


0020 SMSIZE EQU 40 


$00 

$07 

$0D 


0007 

0000 

0011 


37 0300 16 0092 ENTRY 

30 

39 

40 

41 0303 0A RCB 

42 0304 00 

43 0305 0800 

44 0307 01 

45 0300 01 

46 0309 00 

47 030A 00 

40 

49 • 

50 

51 030B 07 MIPLS1 

52 030C 2A 

53 0329 0D 

55 032B 07 MSMLCI 

56 032C 2A 

57 0352 0D 

59 0354 07 MBERR 

60 0357 2A 

61 0370 00 


Buzzer control 
Sub-system status 
Sub-system control 
Memory mode 

5" floppy disk 1 sector read. 

Request number 
I/O status 
Data buffer addr. 

Track 

Sector 

Side 

Unit 

System module size 
tring 


End of 
Buzzer 
Carriage return 
Set field 


EQU 
Entry 
LBRA IPL 

Request control block 

FCB $0A 5" floppy disk 1 sector read 

FCB 0 Dummy 

FOB $0000 Address = $0800 

FCB 1 Track ■ 1 

FCB 1 Sector « 1 

FCB 0 Side = 0 

FCB 0 Unit - 0 

Message 

' FCB BEL 

FCC '**•• S-OS SWORD IPL started I’ 

FCB CR.EOS 

> FCB BEL 

FCC ’**•■ System module loading completed !' 
FCB CR,EOS 


FCB 
FCC 
FCB EOS 

Sub system halt sub-routine 

r LDA SBSIN 
BMI SUBHLT 
LDA Mil 0000000 
STA SBSOUT 
[ LDA SBSIN 


73 

74 

75 037E 

76 0300 

77 0303 
70 0306 
79 0300 
00 0309 
01 030B 
02 030D 
03 030F 
04 0392 
05 0394 
06 

07 

00 

09 0395 

90 0397 

91 039B 

92 039D 

93 039F 

94 03A1 

95 03A3 

96 03A5 

97 03A7 
90 03AA 
99 03AD 

100 03AF 

101 03B3 

102 03B5 

103 03B9 

104 03BB 

105 03BD 

106 03BF 

107 03C2 
100 03C4 

109 03C5 

110 03C7 

111 03C0 

112 03CA 

113 03CE 

114 03D0 

115 03D2 

116 03D4 

117 03D6 
110 03D0 

119 03DA 

120 03DC 

121 03DE 

122 03E0 

123 03E2 

124 03E4 

125 03E6 

126 03E0 

120 03EA 

129 03EE 

130 03F0 

131 

132 

133 

134 03F3 

135 03F7 

136 03F9 

137 
130 
139 


Display message sub-routine 


0D FI 
CE FC02 
CC 0300 
A7 Cl 
5C 

A6 00 
A7 C0 
26 F9 
F7 FC03 
0F 05 
39 


DSPMSG BSR 
LDU 
LDD 
STA 

DSPMS1 INCB 
LDA 
STA 
BNE 
STB 

DSPMS2 CLR 
RTS 


SUBHLT 

0SHARED+2 

#$0300 

,U++ 


,U+ 

DSPHS1 

SHARED+3 

SBSOUT 


Initial program loader main prograa 


1A 50 
10CE FC7F 
06 FD 
IF 0B 
97 0F 
06 01 
97 03 
0D CA 
CC 0C3F 
FD FC82 
0D E3 
30 0DFF50 
0D C9 
30 0DFF4A 
EE 02 
C6 20 

34 54 
BD FE00 

35 54 
40 

26 2C 
5A 

27 20 

33 C90100 
EF 02 
6C 05 
A6 05 
01 10 
23 E5 
06 01 
A7 05 
6C 06 
A6 06 
01 01 
23 D9 
6F 06 
6C 04 
20 D3 


IPL ORCC 
LDS 
LDA 
TFR 
STA 
LDA 
STA 
BSR 
LDD 
STD 
BSR 
LEAX 
BSR 
LEAX 
LDU 
LDB 

IPLOOP PSHS 
JSR 
PULS 
TSTA 
BNE 
DECB 
BEQ 
LEAU 
STU 
INC 
LDA 
CMPA 
BLS 
LDA 
STA 
INC 
LDA 
CMPA 
BLS 
CLR 
INC 
BRA 


30 0DFF3D IPLEXT LEAX 
8D BE BSR 

7E 0000 JMP 


30 0DFF5D IPLERR LEAX 
0D 05 BSR 

20 FE BRA 


M01010000 

0BOTSTK 

MFD 

A.DP 

MEMODE 

01 

BUZZER 

SUBHLT 

M0C00+200111111 

SHARED-f 2 

DSPMS2 

MIPLST.PCR 

DSPMSG 

RCB.PCR 

RCBDBA.X 

0SMSIZE 

U.X.B 

DREADS 

U.X.B 

IPLERR 

IPLEXT 
$100.U 
RCBDBA.X 
RCBSCT.X 
RCBSCT.X 
016 

IPLOOP 

*1 

RCBSCT,X 
RCBSID.X 
RCBSID.X 

#1 

IPLOOP 
RCBSID.X 
RCBTRK.X 
IPLOOP 

MSMLCP.PCR 

DSPMSG 

$0000 


End of initial program loader 


U*H6 


ORG $2000 
* Symbol equate* 

FBFA BIOS EQU $FBFA 

0000 RQNO EQU 0 

0001 RCBSTA EQU 1 

0002 RCBDBA EQU 2 

0004 RCBTRK EQU 4 

0005 RCBSCT EQU 5 

0006 RCBSID EQU 6 

0007 RCBUNT EQU 7 


System genelate prograa entry 


16 2000 20 60 ENTRY BRA SYSGEN 


10 

19 

20 2002 

21 2003 

22 2004 

23 2006 

24 2007 

25 2000 

26 2009 

27 
20 

29 

30 200A 

31 200C 

32 200D 

33 200E 

34 200F 

36 2010 

37 2012 
30 2013 

39 2014 

40 2015 

42 2016 

43 2010 

44 2019 

45 201A 

46 201B 

40 201C 

49 201E 

50 201F 

51 2020 

52 2021 


Request control block 


FCB 

RMB 

RMB 

RMB 

RMB 

RMB 

FCB 


DSKMAP FDB 
FCB 
FCB 
FCB 
FCB 

FDB 

FCB 

FCB 

FCB 

FCB 

FDB 

FCB 

FCB 

FCB 

FCB 

FDB 

FCB 

FCB 

FCB 

FCB 


*DWRITE* 

I/O status 

Data buffer addr. 

Track 

Sector 

Side 

Unit 


Addr. 

Track 

Sector 

Side 

Number of 
FAT 


Systea program 


or 43 (with Memory Editor) 
Dummy 


56 2025 

57 2026 
50 2027 

59 

60 
61 

62 2020 

63 202A 

64 202D 

65 202F 

66 2031 

67 2033 
60 2035 

69 2037 

70 2039 

71 203B 

72 203F 

73 2041 

74 2042 

75 2044 

76 2040 

77 204A 
70 204C 
79 204E 
00 2050 
01 2052 
02 2054 
03 2056 
84 2050 
05 205A 
06 205C 
07 205E 
00 2060 
09 2062 


97 

90 

99 206A 

100 206D 

101 206F 

102 2071 

103 2073 

104 2075 

105 2077 

107 2079 
100 

109 

110 


FCB 0 
FCB 0 
FCB 0 

Write data to disk 


34 40 
30 8CD5 
EC C4 
ED 02 
EC 42 
ED 04 
EC 44 
A7 06 
EE 02 
AD 9FFBFA 
25 26 


5A 
27 20 
33 C90100 
EF 02 
6C 05 
A6 05 
01 10 
23 E9 
86 01 
A7 05 
6C 06 
A6 06 
61 01 
23 DD 
6F 06 
6C 04 
20 D7 


WRTDSK PSHS 
LEAX 
LDD 
STD 
LDD 
STD 
LDD 
STA 
LDU 

WRTLOP JSR 
BCS 


33 0C9D 
A6 45 
27 08 
0D B5 
25 04 
33 46 
20 F4 

39 


2.X 

2.U 

4.X 

4, U 

6.X 

2.X 

[BIOS] 

WRTERR 


LEAU 

STU 

INC 

LDA 

CMPA 

BLS 

LDA 

STA 

INC 

LDA 

CMPA 

BLS 

CLR 

INC 

BRA 


* Symtei 

SYSGEN LEAU 
SYSLOP LDA 
BEQ 
BSR 
BCS 
LEAU 
BRA 

SYSEND RTS 


RCBSCT.X 
RCBSCT.X 
016 

WRTLOP 

01 

RCBSCT.X 
RCBSID.X 
RCBSID.X 
01 

WRTLOP 
RCBSID.X 
RCBTRK.X 
WRTLOP 


• genelater ■ 

DSKMAP.PCR 
5 ,U 

SYSEND 
WRTDSK 
SYSEND 
6, U 
SYSLOP 


End of ’SYSGEN* 


) ‘P-'t UIIKJj ®&fc ta- ii 5 C t b'X S i U;, I'll "CW)i<0 V 7 h 

< - I«J L'KfxMf T;‘7i L T A. 7j L X 1 ? ‘t'To ;nii 

L' 7 (:sw*u-rT. am t&z m 4t«at 


FM-7/77KS S OS “SWORD" 159 








'UH7 FORMAT &. SYSGEN V-X >) * i 


0000 

0000 

0000 

0000 

0000 

0000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 AF 

7001 32 6B 73 
7004 CD E2 IF 

7007 OC 

7008 31 29 20 
70OB 4C 6K 67 
70OK 69 63 61 
7011 6C 20 46 
7014 6F 72 6D 
7017 61 74 

7019 0D 

701A 32 29 20 
701D 26 20 53 

7020 79 73 74 
7023 65 6D 20 
7026 47 65 6K 
7029 65 72 61 
702C 74 65 
702K 0D 

702F 33 29 20 
7032 45 6E 64 
7035 20 6F 66 
7038 20 4A 6F 
703B 62 
703C 01) OD 
703K 49 6E 70 
7041 75 74 20 
7044 4E 75 6D 
7047 62 65 72 
704A 20 
704B 00 
704C CD 21 20 
704F FE IB 

7051 C8 

7052 FE 33 
7054 20 06 
7056 3E 0C 
7058 CD F4 IF 
705B C9 

705C 

705C FE 31 
705E 38 EC 
7060 FE 33 
7062 30 E8 
7064 32 6C 73 
7067 CD F4 IF 
706A FE 31 
706C CA OF 72 
706F 

706F 3A 6H 73 

7072 1)7 

7073 C2 02 71 
7076 

7076 

7076 

7076 CD E2 IF 
7079 OD 01) 
707B 53 6F 75 
707E 72 63 65 
7081 20 44 72 
7084 69 76 65 
7087 20 4E 61 
7 OH A 61) 65 20 
7081) 3D 20 
708K 00 
7090 CD C6 72 

7093 D8 

7094 CD E9 72 

7097 D8 

7098 20 DC 

709A CD E2 IF 
709D OD 0D 
709F IF 6F 77 
70A2 20 53 79 
70A5 73 74 65 
70A8 6D 20 4C 
70AB 6F 61 64 
70AE 69 6E 67 
70)11 2K 2E 2E 
70B4 2F. 

7 0B5 00 
70B6 21 00 80 
70B9 11 00 00 
70BC 3E 01 
70BE CD 00 20 
70C1 DA 18 73 
70C4 21 00 81 
70C7 11 20 00 
7OCA 3B 28 
70CC CD 00 20 
70CF DA 18 73 
70D2 

70D2 CD 55 73 
70D5 28 26 
70D7 CD C4 IF 
70DA CD K2 IF 
7ODD 0D OD 
70DF 54 68 69 
70E2 73 20 69 
70E5 73 20 6E 
70E8 6F 74 20 
7CER 53 79 73 
70EE 74 65 6D 
70F1 20 44 69 
70F4 73 6B 20 
70F7 21 21 
70P9 00 
70FA C3 76 70 
70KD 
70FD 

70FD 3E FF 
7OFF 32 6B 73 
7102 

7102 CD C4 IF 
7105 CD E2 IF 
7108 OD 0D 
71OA 53 79 73 
710D 74 65 CD 
7110 20 4C 6F 
7113 61 64 20 
7116 43 6F 6D 
7119 70 6c 65 
7 11C 7 4 65 20 
7 1 IF 21 21 
7 12 1 01) OD 00 
7124 


1 ;+♦ + ♦ + + ♦+♦*♦♦•*•♦♦♦♦ + + ♦ + + •►♦♦♦♦)■♦♦♦ + ♦*♦♦ 

2 ; Logical Format & Syatca Generate 

3 ; 


*t I 

5 ;+♦++♦++++*♦+♦ 

6 

7 ORG 

8 

9 tLTN'L EQU 

10 #MPRNT EQU 

11 #PRINT EQU 

12 #FLGET EQU 

13 #DRDSB EQU 

14 #DWTS8 EQU 

15 •ERROR EQU 

16 f DSK EQU 

17 »FATBF EQU 

18 #MXTRK EQU 

19 ♦FATPOS EQU 


20 *DIRPS EQU 

21 fBELL EQU 

22 

23 RETRY XOR 

24 LD 

25 AGAIN0 CALL 

26 DEFB 

27 DEFM 


for FH-7 

70O0H 

1FEEH 

1FE2H 

1FF4H 

202111 

200011 

20Q3H 

2033H 

1F5DH 

SIF62 

1F66H 

1F5EH 

1F60H 

1FC4H 

A 

(LOAD) t A 

•MPRNT 

OCH 

”1) Logical Format” 


28 DEFB 0DH 

29 DEFM "2) k System Generate" 


30 

31 


32 

33 


DEFB ODH 

DEFM ”3) End of Job" 


DEFB ODH:ODH 

DEFM “Input Number " 


34 

35 KEYIN1 

36 

37 

38 

39 

40 ENDFMT 

41 

42 

43 

44 FMAT 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 

57 ; 

58 

59 SYSRD1 

60 
61 


DEFB 0 

CALL 4FLGET 

CP 1BH 

RET Z 

CP *3' 

JR NZ.FMAT 

LD A.0CH 

CALL *PR1ST 

RET 

CP *1* 

JR CiKEY IN 1 

CP '2'♦1 

JR NC.KEYINl 

LD (WORKNO|,A 

CALL *PRINT 

CP ' 1* 

JP Z.FORMAT1 

LD Ai(LOAD I 

OR A 

JP NZ.SYSWTl ;tr System Los 

LOAD SYSTEM 

CALL #MPRNT 

DF.F3 ODH: ODH 

DEFM "Source Drive Name r " 


62 DEFB 

63 CALL 

64 RET 

65 CALL 

66 RET 

67 JR 

68 SYSRD2 CALL 

69 DEFB 

70 DEFM 


0 

DSKGET 

C 

SURE 

C 

NZ.SYSRDI 
•MPRNT 
ODH:ODH 

"Now System Loading...." 


71 

72 

73 

74 

75 

76 

77 

78 

79 

80 
81 
82 

83 

84 

85 

86 

87 

88 


DEFB 0 

LD HL1800011 

LD DK,0 

LD A, 1 

CALL 4DRDSB 

JP C,ERROR 

LD HL.8100H 

LD DE.20H 

LD A,40 

CALL IDRDSB 

JP C,ERROR 

CALL CHKSYS I SYSTI 

JR Z.RDEND 

CALL • BELL 

CALL •MPRNT 

DEFB ODH:ODH 

DEFM "This Is not System Disk 


89 DEFB 0 

90 JP SYSRD1 


92 RDEND: 

93 LD 

94 LD 

95 ; 

96 SYSW'Tl CALL 

97 CALI. 

98 DEF3 

99 DEFM 


A.0FFH 
(LOAD 1.A 

• BELL 
•MPRNT 
ODH:ODH 

"System Load Complete !!" 


100 DEFB ODH:ODH Ml 

101 


7124 
7124 
7124 CD 
7127 OD 
7129 44 
712C 74 
712F 61 
7132 6F 
7135 44 
7138 76 
7I3B 4 E 
713E 65 

7141 20 

7142 00 

7143 CD 

7146 DR 

7147 CD 
714A D8 
71 IB 20 
7 1 41) 
714D 
714D 
714D ED 

7150 IF 

7151 2A 
7154 3E 
7156 CD 

7159 DA 
715C 11 
7I5F 1A 

7160 B7 

7161 28 

7163 13 

7164 BE 

7165 23 

7166 20 
7168 18 
7 16A 

7 16A 
7I6A 
716A CD 
716D 6D 
716F 4E 
7172 20 
7175 73 
7178 6D 
717B 72 
717E 69 
7181 2E 

7184 2E 

7185 0D 
7187 21 
718A 11 
718D 3E 
718F CD 
7192 DA 
7195 21 
7198 11 
719B 3E 
719D CD 
71 AO DA 
71 A3 CD 
71A6 OD 
71A7 53 
71AA 74 
71AD 20 
7lBO 6E 
71B3 61 
71B6 20 
71B9 6D 
71BC 65 
71BF 20 
7IC1 00 
71C2 18 
7 1C4 

7 1C4 
71C4 CD 
71C7 CD 
71CA OD 
7 ICC 44 
71CF 74 
71D2 61 
71D5 6F 
7 IDS 69 
71DB 53 
71DE 74 
7IE1 2B 
71E4 73 
71E7 0D 
71E8 44 
71KB 79 
71 EE 20 
7IF1 6B 
71F4 74 
7IF7 77 
71 PA 74 
71FD 6P 
7200 69 

7203 3F 

7204 00 

7205 CD 

7208 D8 

7209 C2 
720C C3 
720F 
720F 
720F 
720F 
720F CD 
7212 0D 
7214 46 
7217 6D 
72IA 20 
721D 69 
7220 20 
7223 6D 
7226 3D 

7228 00 

7229 CD 
722C DB 
722D CD 

7230 DB 

7231 20 
7233 CD 
7236 0D 
7238 49 
723B 74 
723E 6C 
7241 69 
7244 2E 
7247 0D 

7249 3E 
724B ED 
724E IP 
724F 12 

7250 13 

7251 3K 

7253 12 

7254 13 

7255 OB 
7267 3A 
725A FE 
725C 28 
725E 
725F. 
725E 
725K 
725B 3E 


E2 IF 
OD 

65 73 
69 6E 
74 69 
6E 20 
72 69 
65 20 
61 6D 
20 3D 


C6 72 
K9 72 
B5 


5B 5F. 

62 IF 
01 

00 20 
18 73 
F5 7 3 


61 


02 

F5 


E2 IF 
01) 

6F 77 
53 79 
74 65 

20 57 

69 74 
6E 67 
2fi 2E 

00 

00 80 
00 00 
01 

03 20 
18 73 
00 81 
20 00 
28 

03 20 
18 73 
R2 IF 

79 73 
65 6D 
47 65 
65 72 
74 65 
43 6F 

70 6C 
74 65 

21 

6F 


C4 IF 
E2 IF 
OD 

65 73 
69 6E 
74 69 
6E 20 

73 20 
79 73 
65 6D 
44 69 
6B 2K 

6F 20 
6F 75 
77 61 

74 20 
6F 20 
72 69 
65 20 
6B 20 
74 20 


E9 72 


E2 IF 
0D 

6F 72 
61 74 
44 72 
76 65 
4E 61 
65 20 
20 

C6 72 
E9 72 
DC 

B2 IF 
0D 

6E 69 
69 6 1 
69 7A 
6E 67 
2E 2E 
00 
01 

5B 62 


8F 


03 

GC 73 

31 

0D 


03 


102 

103 

104 

105 

106 


SYSWT2 


SELECT DISTINATION DRIVE 

CALL *MPRNT 

DEFB ODH:ODH 

DEFM "Destination Drive Name 


107 

108 

109 

110 
111 
112 

113 

114 

115 

116 


DEFB 0 

CALL DSKGET 

RET C 

CALL SURE 

RET C 

JR NZ.SYSWTl 

CHECK SYSTEM ? 

LD DE,(tFATPOS) 


117 

118 
1 19 
120 
121 

122 LPFT 

123 

124 

125 

126 

127 

128 

129 

130 

131 ; 

132 

133 CANWT 

134 

135 


LD HL,(•FATBF) 

LD A, 1 

CALL tDRDSB 

JP C,ERROR 

LD DE,FATDTA 

LD A,(DE1 

OR A 

JR Z.ITSSYS 

INC DE 

CP (HL1 

INC HL 

JR NZ,CANWT 

JR LPFT 

WRITE SYSTEM 

CALL #MPRNT 

DEFB ODH:ODH 

DEFM "Now System Writing- 


136 

137 

138 

139 

140 

141 

142 

143 

144 

145 

146 

147 

148 

149 


DEFB GDiCO 

LD HL.8O00H 

LD DE,0 

LD A, 1 

CALL #DWTSB 

JP C,ERROR 

LD HL.81O0H 

LD DE.20H 

LD A,40 

CALL #DWTSB 

JP C,ERROR 

CALL «MPRNT 

DEFB ODH 

DEFM "System Generate Complete 


150 DEFB 

151 JR 

152 ; 

153 1TSSY8: 

154 CALL 

155 CALL 

156 DEFB 

157 DEFM 


• BELL 
•MPRNT 
0DH:ODH 

"Destination ia System Di 


158 DEFB ODH 

159 DEFM "Do you want to write on 


162 

163 

164 

165 

166 

167 

168 

169 

170 

171 


DEFB 0 

CALL SURE 

RBT C 

JP NZ.SYSWT2 

JP CANWT 


; LOGICAL FORMAT 

FORMAT1 CALL «MPRNT 

DEFB ODH:ODH 

DEFM "Format Drive 


Name = ” 


172 DEFB 

173 CALL 

174 RET 

175 CALL 

176 RBT 

177 JR 

178 FORMAT2 CALL 

179 DEFB 

180 DEFM 


0 

DSKGET 

C 

SURE 

C 

NZ,FORMAT1 
•MPRNT 
ODH:ODH 

"Initializing...” 


181 DEFB 0DH:0 

182 LD A.1 

183 LD DE,(•FATBF) 


184 

185 


188 

189 

190 


194 

195 

196 

197 


LD (DE),A 

INC DB 

LD A.8FH 

LD (DE),A 

INC DE 

LD C,3 

LD A,(WORKNO) 

CP ’l* 

JR Z,FORMAT3 


MAKE FAT 

LD A,3 JIf System Generated 
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► 8080fc WL-tttz 7 >jK— hW 4 a > 4r$o tz T -fc > 7*V nft o 

£ Ltz a (22) 




HE SENTINEL 


7260 12 

7261 13 

7262 3C 

7263 12 

7264 13 

7265 3E 

7267 12 

7268 13 

7269 OE 
726B 
726B AF 
726C 12 
726D 62 
726F 13 

7270 3A 

7273 91 

7274 4F 

7275 06 
7277 ED 
7279 3E 
727B 23 
727C 13 
727D 77 
727E 3A 

7281 4F 

7282 3E 

7284 91 

7285 4F 

7286 06 
7288 ED 
728A 3E 
728C ED 
728F IF 
7290 2A 
7293 CD 
7296 DA 
7299 
7299 
7299 

7299 21 
729C 36 
729E 11 
72A1 01 
72A4 ED 
72A6 3E 
72A8 ED 
72AB IF 
72AC 21 
72AF CD 
72B2 38 
72B4 
72B4 CD 
72B7 0D 
72B8 43 
72BB 70 
72BE 74 
72C1 21 
72C2 0D 
72C4 18 
72C6 
72C6 
72C6 
72C6 
72C6 
72C6 
72C6 CD 
72C9 FE 
72CB 20 
72CD 37 
72CR C9 
72CF FE 
72D1 38 
72D3 FE 
72D5 30 
72D7 D6 
72D9 FE 
72DB 38 
72DD FE 
72DF 30 
72E1 32 
72E4 CD 
72E7 B7 
72E8 C9 
72E9 
72E9 
72E9 
72E9 
72E9 
72E9 
72E9 
72E9 
72E9 CD 
72EC 0D 
72EE 41 
72F1 20 
72F4 75 
72F7 75 
72FA 20 
72FD 2F 

7300 20 

7303 00 

7304 CD 
7307 FE 

7309 20 
730B 37 
730C C9 
730D CD 

7310 FE 

7312 C8 

7313 FE 

7315 37 

7316 3F 

7317 C9 

7318 
7318 
7318 
7318 
7318 
7318 CD 


62 IF 
03 20 
18 73 


6F 6D 
6C 65 
65 20 


72 65 
79 6F 
20 73 
72 65 


198 

199 

200 
201 
202 

203 

204 

205 

206 

207 

208 F0RHAT3 

209 

210 
211 
212 

213 

214 

215 

216 

217 

218 

219 

220 
221 
222 

223 

224 

225 

226 

227 

228 

229 

230 

231 

232 

233 

234 

235 

236 

237 

238 

239 

240 

241 

242 

243 

244 

245 

246 

247 

248 

249 


(HL),A 
A,(•MXTRK) 
C, A 
A.OFFH 


LD DE i ( #FATPOS ) 

LD HL.(fFATBF) 

CALL IDWTSB 

JP C,ERROR 

MAKE DIRECTORY 

LD HL,0B00OH 

LD (HL),0FFH 

LD DE, 01)901H 

LD BC.OFFFH 


LD HL,OBOOOH 

CALL #DWTSB 

JR C,ERROR 

CALL IMPKNT 

DEFB ODH 

DEEM "Complete 


250 

251 

252 

253 

254 ; 

255 ; 

256 ; 

257 

258 DSKGET CALL 

259 CP 

260 JR 

261 SCF 

262 RET 

263 DSKGT1 CP 

264 JR 

265 CP 


267 

268 

269 

270 

271 

272 

273 

274 

275 

276 

277 

278 

279 

280 
281 
282 

283 

284 

285 

286 


GET DRIVE NAME 

Cy=1 : BREAK KEY PRESSED 


IFLGBT 

1BH 

NZ.DSKGTl 


; Hrcuk Key Pressed 


NC,DSKGET 
(#DSK1iA 
•PRINT 


ASK SURE ? 

CYrl : BREAK KF.Y PHESSED 


SURE CALL *MPRNT 
DEFB ODH,ODH 

DEEM "Are you sure (Y/Nl 


287 

288 SUREO 

289 

290 

291 

292 

293 SURE 1 

294 

295 

296 

297 

298 

299 

300 

301 ; 

302 ; 

303 ; 

304 

305 ERROR 


SCF 

RET 

CALL 


SCF 

CCF 

RET 


• FLGF.T 
1BH 

NZ.SUREl 


;Break Key Pressed 


73 IB CD 33 20 
731E CD E2 IF 
7321 52 65 74 
7324 72 79 20 
7327 28 59 2F 
732A 4E 29 20 
732D 3F 20 
732F 00 
7330 CD 04 73 

7333 D8 

7334 CA 00 70 

7337 C9 

7338 
7338 
7338 
7338 
7338 
7338 

7338 CD E2 IF 

733B OD 

733C 41 67 61 

733F 69 6E 20 

7342 28 59 2F 

7345 4E 29 20 

7348 3F 20 

734A 00 

734B CD 04 73 

734E D8 

734F CA 04 70 

7352 C3 56 70 

7355 

7355 

7355 

7355 

7355 

7355 

7355 

7355 21 6D 73 
7358 OE 04 
735A 
735a 5E 
735B 23 
735C 56 
7350 23 
735E 06 20 

7360 1A 

7361 13 

7362 BE 

7363 23 

7364 CO 

7365 10 F9 

7367 OD 

7368 20 F0 
7 36A C9 
7361) 

736B 00 
736C 00 
736D 
736D 

7360 10 80 
736F 20 53 2D 
7372 4F 53 20 
7375 53 57 4F 
7378 52 44 20 
737B 49 50 4C 
737E 20 
737F 73 74 61 
7382 72 74 65 
7385 64 20 21 
7388 OD 00 07 
738B 2A 2A 2A 
738B 2A 
738F 

738F 00 9A 
7391 ED 7B 6C 
7394 IF CD D6 
7397 IF 3E 
7399 23 CD F4 
739C IF ED 5B 
739F 76 IF 
73A1 Cl) D3 IF 
73A4 CD IB 21 
73A7 DC 33 
73A9 20 18 E5 
73AC 1A FE 23 
73AF 28 02 
73B1 

73B1 00 9F 
73B3 7E 32 DE 
73B6 27 EB 29 
7 3B9 29 29 
73BB 29 EB El 
7 3BE B7 28 19 
73C1 FE 80 
73C3 30 19 3E 
73C6 10 CD 44 
73C9 25 1)8 
73CB II 00 10 
7 3CK 19 E5 69 
73D1 60 1)7 
73D3 

73D3 80 A3 
73D5 6F 63 61 
73D8 74 69 6F 
73DB 6E 20 
73D1) 54 61 62 
7 3E0 6C 65 OD 
73E3 46 69 
73E5 6C 65 20 
73E8 6E 6F 74 
73F.B 20 46 
73ED 6F 75 6E 
73F0 64 OD 44 
73F3 65 76 
73F5 
73F5 

73F5 01 8F 03 
73F8 04 8F 00 


306 CALL IERROR 

307 CALL »MPRNT 

308 DEFM "Retry (Y/N) 


ASK AGEIN 

Y : GOTO MENU 

N : RETURN TO SYSTEM 


AGAIN CALL 4MPRNT 

DEFB ODH 

DEFM "Again (Y/N) 


323 

324 

325 

326 

327 

328 

329 ; 

330 ; 

331 ; 

332 ; 

333 

334 CHKSYS: 

335 

336 

337 CHKNXT: 

338 

339 

340 

341 

342 

343 CHKLOOP 

344 

345 

346 

347 

348 

349 

350 

351 

352 

353 LOAD 

354 WORKNO 

355 

356 CHKDTA: 

357 

358 


359 

360 


DEFB 

CALL 

RET 


CHBCK SYSTEM DISK 


INC 

RET 

DJNZ 

DEC 


362 

363 

364 


365 

366 

367 


368 . 

369 

370 


371 

372 

373 


NZ,CHKNXT 


"b tarted !" 

ODH:OOH:07H 


023H:0CD11: 0F4H: 01FH: 0EDH: 05BH 
OCDH:0D3H:01FH:0CDH:01BH:021H 
020H:O18H:0K5H:01AH:0FEH:O23H 


DEFB 

DEFB 

DEFB 


:0!FH:O3KH 

: 076H:01FH 

: 0DCH:033H 

: 028H:002H 

:029H:O29H 

029H :OEBH: OE 1H: 0B7H : 02811:019H: 0FEH: 080H 
030H:019H:03EH:01011:OCDH:044H:025H:0D8H 

011H:OO0H: 01011: 019H:OE5H:069H:O6OH:0B711 


054H:061H;062H:06CH:065H:OODH:046H:069H 
06CH :065H: 02011: 06EH: 06FH: 074H: O20H : 046H 

06FH:075H:06KH:064H:OODH:O44H:065H:076H 

0lH:8FH:03H:04H:8FH:0 


')* h 18 * - Ym?'< 


1435 

1143 

23 

DHLPM FCC 





1455 137D 

23 

FCC 

'0 H 

0 

Display help aessage. o' 

1436 

117B 

8D 

FCB 

CR 




1456 13B5 

0D 

FCB 

CR 



1437 

117C 

23 

FCC 

' 0 

S-OS SWORD/FH- 

-7 Z-BO Debugger coaaund menu o' 

1457 13B6 

23 

FCC 

•o I adrl.letter 

0 

Insert aeaory staap on (adrl)-. •’ 

1430 

11B4 

OD 

FCB 

CR 




1458 13EE 

OD 

FCB 

CR 



1439 

11B5 

23 

FCC 





1459 13EF 

23 

FCC 

'0 J adrl 

o 

Jump to adrl. 0' 

1440 

11 ED 

OD 

FCB 

CR 




1460 1427 

OD 

FCB 

CR 



1441 

11EE 

23 

FCC 

'0 

B 

0 

Display current break point. O' 

1461 1428 

23 

FCC 

'0 H[adrl) 

0 

Exchange contents of aeaory. o' 

1442 

1226 

OD 

FCB 

CR 




1462 1460 

OD 

FCB 

CR 



1443 

1227 

23 

FCC 

•* 

B * 

0 

Release current break point. O' 

1463 1461 

23 

FCC 

'» P 

0 

Coapleaent printer switch. o' 

1444 

125F 

OD 

FCB 

CR 




1464 1499 

OD 

FCB 

CR 



1445 

1260 

23 

FCC 

"0 

B adrl 

It 

Set break point on (adrl). O’ 

1465 149A 

23 

FCC 

'0 Q 

0 

Quit to SWORD. O' 

1446 

1298 

OD 

FCB 

CR 




1466 14D2 

0D 

FCB 

CR 



1447 

1299 

23 

FCC 

•o 

C adrl,adr2 

it 

Caliculate adrl+«dr2.adrl-adr2. O' 

1467 14D3 

23 

FCC 

'0 R 

0 

Display/exchange registers. O' 

1448 

12D1 

OD 

FCB 

CR 




1468 150B 

OD 

FCB 

CR 



1449 

12D2 

23 

FCC 

•0 

D| adrl(,adr2J] 

tt 

Duap froa adrl to adr2. O' 

1469 150C 

23 

FCC 

'0 S adrl,adr2,dt 

0 

Serch "dt" froa adrl to adr2. O' 

1450 

130A 

OD 

FCB 

CR 




1470 1544 

OD 

FCB 

CR 



1451 

130B 

23 

FCC 

'0 

F adrl,adr2,dt 

» 

Fill froa adrl to adr2 with dt. o' 

1471 1545 

23 

FCC 

•0 T adrl,adr2.adr3 

0 

Transfer froa adrl-adr2 to adr3. o' 

1452 

1343 

OD 

FCB 

CR 




1472 157D 

OD 

FCB 

CR 



1453 

1344 

23 

FCC 

• 0 

G[adrl] 

0 

Go object prograa. i»* 

1473 157E 

23 

FCC 




1454 

137C 

OD 

FCB 

CR 




1474 15B6 

OD 

FCB 

CR.EOS 
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10 
20 
30 
40 
50 
60 1 
70 
80 1 
90 
100 
110 
120 
130 
140 
150 
160 
170 
180 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 
300 
310 
320 
330 
340 
350 
360 
370 
380 
390 
400 
410 
420 
4 30 
440 
450 
460 
470 
480 
490 
500 
510 
520 
530 
540 
550 
560 
570 
580 
590 
600 
610 
620 
630 
640 
650 
660 
670 
680 
690 
700 
710 
720 
730 
740 
7 50 
760 
770 
780 
790 
800 
810 
820 
830 
840 
850 
860 
870 
880 
890 
900 
9 10 
920 
9 30 
94 0 
950 
960 
9 70 
980 
9 90 


Please Wait." 


//////////////////// 

/ / 

/ PUZZLE GAME / 

/ / 

/ "STAR PANIC" / 

/ / 

/ / 

//////////////////// 

WIDTH 40:INIT:CLS4 

LINE!32,88)-(281,112),PSET,1,BF 
LINE(32,88)-(281,112),PSET,7,B 
LOCATE 5,12:PRINT"Now PCG Setting. 

GOSUB "PCGSET" 

CLS4 

SCREEN0,1,0:CGEN1:LOCATE 0,0 
PRINT" I J Urn i -J 1 1 I 

print" m-- -wd mm tm -r«J 

PRINT" ■ «—■ mm 
PRINT" tJI mm 

PRINT" M—m II II II II II 

PRINT 

PRINT" i —J I ■ ■ ■ ■ I ■ 

PRINT" ■■ T-_J| ■u-hj mm mm mm 

PRINT" 

PRINT" Ml ■■ mm ^m ‘-■jb mi kjh 

PRINT" II II II II II II 

PRINT 

PRINT" PROGRAM BY TOSHIHIRO NAKAOKA" 

SCREEN0,0:COLOR7 

LOCATE 1,4:PRINT"MOVE - 4826 KEY" 

LOCATE 20,4:PRINT"JUMP .... SPACE KEY" 

LOCATE 6,8 :CSIZE2:PRINT#0,"STARS" 

LOCATE 5,10:PRINT" . r J , • ?t" 

LOCATE 5,11: PRINT"-7 it *>*" 

LOCATE 26,8 :PRINT#0,"BALLS" 

LOCATE 25,10: PRINT"-*o x* + x ■ ?" 

LOCATE 25,11:PRINT"5* on tV" 

LOCATE 18,8:PRINT"STONE" 

LOCATE 20,10: PRINT"—— I " 

PALET 0,2:PALET 1,0 

LINE(0,16)-(319,104),PSET,1,BF 

LOCATE 8,18:PRINT#0,"NOW LOADING" 

LOCATE 8,20:PRINT#0,"PLEASE WAIT" 

KEY5,"RUN 20"+CHR$(13):RUN"STAR MAIN" 

LABEL "PCGSET" 

DEFCHRS(0)=HEXCHR$("000000000000000000000000000000000000000000000000") 
DEFCHR$(1)=HEXCHR$("000000000000000000000000000000000000000000000000") 
DEFCHR$(2)=HEXCHR$("000000000000000000000000000000000000000000000000") 
DEFCHRS(3)=HEXCHR$("000000000000000000000000000000000000000000000000") 
DEFCHRS(4)=HEXCHR$("000000000000000000000000000000000000000000000000") 
DEFCHRS(5)=HEXCHR$("000000000000000000000000000000000000000000000000") 
DEFCHRS(6)=HEXCHR$("000000000000000000000000000000000000000000000000") 
DEFCHRS(7)=HEXCHR$("000000000000000000000000000000000000000000000000") 
DEFCHRS(8)=HEXCHR$("10387CFEFFFFFFFF100804020101010110387CFE7F7F7F7F") 
DEFCHRS(9)=HEXCHR$("10387CFEFFFFFFFF100804020101010110387CFE7F7F7F7F") 
DEFCHRS(10)=HEXCHR$("0F1F3F7FFF7F3F1F0F102040800000000F1F3F7FFF7F3F10") 
DEFCHRS(11)=HEXCHR$("FFFFFFFFFFFFFFFFFF00000000000000FFFFFFFFFFFFFF00") 
DEFCHRS(12)=HEXCHR$("FFFFFFFFFFFFFFFFFF00000000000000FFFFFFFFFFFFFF00") 
DEFCHRS(13)=HEXCHR$("F0F8FCFEFFFEFCF8F00804 0201000000F0F8FCFEFFFEFC08") 
DEFCHRS(14)=HEXCHR$("FFFFFFFFFFFFFFFF01010101010101017F7F7F7F7F7F7F7F") 
DEFCHRS(15)=HEXCHR$("FFFFFFFFFFFFFFFF01010101010101017F7F7F7F7F7F7F7F") 
DEFCHRS(16 ). = HEXCHR$("000000000000000000000000000000000000000000000000") 
DEFCHRS(17)=HEXCHR$("000000000000000000000000000000000000000000000000") 
DEFCHRS(18)=HEXCHR$("000000000000000000000000000000000000000000000000") 
DEFCHRS(19)=HEXCHR$("000000000000000000000000000000000000000000000000") 
DEFCHRS(20)=HEXCHR$("000000000000000000000000000000000000000000000000") 
DEFCHRS(21)=HEXCHR${"000000000000000000000000000000000000000000000000") 
DEFCHRS(22)=HEXCHR$("000000000000000000000000000000000000000000000000") 
DEFCHRS(23)=HEXCHR$("000000000000000000000000000000000000000000000000") 
DEFCHRS(24)=HEXCHR$("FFFFFFFFFFFFFFFF01010101010101017F7F7F7F7F7F7F7F") 
DEFCHRS(25)=HFXCHR$("FFFFFFFFFFFFFFFFO1010101010101017F7F7F7F7F7F7F7F") 
DEFCHRS(26)=HHXCHR$("0F1F3F7FFF7F3F1F0F102040800000000F1F3F7FFF7 F3F10") 
DEFCHRS(27)=HEXCHRS("FFFFFFFFFFFFFFFFFF0000O000000000FFFFFFFFFFFFFF00") 
DEFCHRS(28)=HEXCHR$("FFFFFFFFFFFFFFFFFF0000O000000000FFFFFFFFFFFFFF00") 
DEFCHRS(29)=HEXCHR$("F0F8FCFEFFFEFCF8F008040201000000F0F8FCFEFFFF.FC08") 
DEFCHRS(30)=HEXCHR$("FFFFFFFFFE7C381001010101020408107F7F7F7FFE7C3810") 
DEFCHRS(31)=HEXCHR$("FFFFFFFFFE7C381001010101020408107F7F7F7FFE7C3810") 
DEFCHRS(32)=HEXCHR$("000000000000000000000000000000000000000000000000") 
DEFCHRS(33)=HEXCHR$("181818181800180018181818180018001818181818001800") 
DEFCHRS(34)=HEXCHRS<"6C6C360000O000006C6C360O000000006C6C3600000O00OO") 
DEFCHRS(35)=HKX( HRS("36366C000000000036366C000000000036366C000O000000") 
DEFCHRS ( 36 ) =HEXCHRS( " 1 83F.583C 1A7C1800183E583C1A7C1800 1 83E583CIA7C 1800" ) 
DEFCHRS(37)=HEXCHR$("0063660C 1 8366600O063660C183666000O63660C18366600") 
DEFCHRS(38)=HEXCHR$("386C6C396A663B00386C6C396A663B00386C6C396A663B00") 
DEFCHRS(39)=HE\(HRS("181808100000000018180810000000001818081000000000") 
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DEFCHRS(40)=HEXCHR$("081030303010080008103030301008000810303030100800" ) 
DEFCHRS(41)=HEXCHR$("201018181810200020101818181020002010181818102000") 
DEFCHRS(42)=HEXCHR$(" 1054387C38541000105438 7C385410001054387C38541000" ) 
DEFCHR$(43)=HEXCHR$("0018187E181800000018187E181800000018187El8180000") 
DEFCHRS(44)=HEXCHR$("000000003818300000000000381830000000000038183000") 
DEFCHRS(45)=HEXCHR$("0000007E000000000000007E000000000000007E00000000") 
DEFCHRS(46)=HEXCHRS("000000003838000000000000383800000000000038380000") 
DEFCHRS(47)=HEXCHR$("0003060C183060000003060C183060000003060C18306000") 
DEFCHRS(48)=HEXCHR$("3C66666666663C003C66666666663C003C66666666663C00") 
DEFCHRS(49)=HEXCHR$("181818181818180018181818181818001818181818181800") 
DEFCHRS(50)=HEXCHR$("3C66061C30607E003C66O61C30607E003C66061C30607E00") 
DEFCHRS(51)=HEXCHR$("3C66063C06663C003C66063C06663C003C66063CO6663C00") 
DEFCHRS(52)=HEXCHR$("O60E1E36667F0600060E1E36667F06OO060E1E36667F0600") 
DEFCHRS(53)=HEXCHR$("7E607C0602663C007E607C06O2663C007E607C0602663C00") 
DEFCHRS(54)=HEXCHR$("1C30607C66663C001C30607C66663CO01C30607C66663C00") 
DEFCHRS(55)=HEXCHR$("7E660C18181818007E660C18181818007E660C1818181800") 
DEFCHRS(56)=HEXCHR$("3C66663C66663C0O3C66663C66663CO03C66663C66663C00") 
DEFCHRS(57)=HEXCHR$("3C66663E060C38003C66663E060C38003C66663E060C3800") 
DEFCHRS(58)=HEXCHR$("003030003030000000303000303000000030300030300000") 
DEFCHRS(59)=HEXCHR$("003030003010200000303000301020000030300030102000") 
DEFCHRS(60)=HEXCHR$("0C18306030180C000C18306030180C000C18306030180C00") 
DEFCHRS(61)=HEXCHR$("O0007E007E00000000007E0O7E00000000007E007E0O0000" ) 
DEFCHRS(62)=HEXCHR$("30180C060C18300030180C060C18300030180C060C183000") 
DEFCHRS(63)=HEXCHR$("3C66060C180018003C66060C180018003C66060C18001800") 
DEFCHRS(64)=HEXCHR$("1E214D554E211E001E214D554E211EO01E214D551E211E00") 
DEFCHRS(65)=HEXCHR$("070B13237F636300070B13237F636300070B13237F636300") 
DEFCHRS(66)=HEXCHR$("7C66667C63637E007C66667C63637E007C66667C63637E00") 
DEFCHRS(67)=HEXCHR${"1E23606060231E001E23606060231E001E23606060231E00") 
DEFCHRS(68)=HEXCHR$("7C26232323267C007C26232323267C007C26232323267C00") 
DEFCHRS(69)=HEXCHR$("7E60607C60607F007E60607C60607F007E60607C60607F00") 
DEFCHRS(70)=HEXCHR$("7F60607C606060007F60607C606060007F60607C60606000") 
DEFCHRS(71)=HEXCHR$("1E23606067211E001E23606067211E001E23606067211E00") 
DEFCHRS(72)=HEXCHR$("636363637F636300636363637F636300636363637F636300") 
DEFCHRS(73)=HEXCHR$("3C18181818183C003C18181818183C003C18181818183C00") 
DEFCHRS(74)=HEXCHR$("0F06060666663C000F06060666663COO0F06060666663C00") 
DEFCHRS(75)=HEXCHR$("63666C786666630063666C786666630063666C7866666300") 
DEFCHRS(76)=HEXCHR$("6060606060607F006060606060607F006060606060607F00") 
DEFCHRS(77)=HEXCHR$("63776B6B6363630063776B6B6363630063776B6B63636300") 
DEFCHRS(78)=HEXCHR$("4363736B676363004363736B676363004363736B67636300") 
DEFCHRS(79)=HEXCHR$("1C36636363361C001C36636363361C001C36636363361COO") 
DEFCHRS(80)=HEXCHR$("7E6363637E6060007E6363637E6060007E6363637E606000") 
DEFCHRS(81)=HEXCHR$("1C2663636B3E1B001C2663636B3E1B001C2663636B3E1B00") 
DEFCHRS(82)=HEXCHR$("7E6363637E6C63007E6363637E6C63007E6363637E6C6300") 
DEFCHRS(83)=HEXCHR$("3E63603E03633E003E63603E03633E003E63603E03633E00") 
DEFCHRS(84)=HEXCHR$("7E181818181818007E181818181818007E18181818181800") 
DEFCHRS(85)=HEXCHR$("6363636363633E006363636363633E006363636363633E00") 
DEFCHRS(86)=HEXCHR$("63636336361C080063636336361C080063636336361C0800") 
DEFCHRS(87)=HEXCHR$("6363636B6B7763006363636B6B7763006363636B6B776300") 
DEFCHRS(88)=HEXCHR$("6363361C366363006363361C366363006363361C36636300") 
DEFCHRS(89)=HEXCHR$("666666663C181800666666663C181800666666663C181800”) 
DEFCHRS(90)=HEXCHR$("3F460C1830617E003F460C1830617E003F460C1830617E00") 
DEFCHRS(91)=HEXCHR$("3C20202020203C003C20202020203C003C20202020203C00") 
DEFCHRS(92)=HEXCHR$("66247E187E18180066247E187E18180066247E187E181800" ) 
DEFCHRS(93)=HEXCHR$("780808080808780078080808080878007808080808087800") 
DEFCHRS(94)=HEXCHR$("183C660000000000183C660000000000183C6600O0000000") 
DEFCHRS(95)=HEXCHR$("0000000000O0FF00000000000000FF0000000000O000FF00") 
DEFCHRS(96)=HEXCHR$("7F3F1F0F070301007F3F1F0F070301007FBFDFEFF7FBFDFE") 
DEFCHRS(97)=HEXCHR$("FEFCF9F2E5CA952AFEFCF9F2E5CA952AFEFDFBF7EFDFBF7F") 
DEFCHRS(98)=HEXCHR$("000000000000000000000000000000007F7F7F7F7F7F7F7F") 
DEFCHRS(99)=HEXCHR$("54AA54AA54AA54AA54AA54AA54AA54AAFEFEFEFEFEFEFEFE") 
DEFCHRS(100)=HEXCHR$("0OFFFFFFFFFFFFFF00FFFFFFFFFFFFFF00FFFFFFFFFFFFFF" ) 
DEFCHRS(101)=HEXCHR$("O0FFFFFFFFFFFFFF00FFFFFFFFFFFFFF00FFFFFFFFFFFFFF"I 
DEFCHRS(102)=HEXCHR${"00000000000000000000000O00000O00FFFFFFFFFFFFFFFF") 
DEFCHRS(103)=HEXCHR$("0000000000000000000O000000000000FFFFFFFFFFFFFFFF") 
DEFCHRS(104)=HEXCHR$("201700000020202060F7F760006060602017070000606060") 
DEFCHRS(105)=HEXCHR$("02E100000002020206EFEF060006060602E1E00000060606") 
DEFCHRS(106)=HEXCHR$("202020202000201060606060600060F06060606060002010") 
DEFCHRS(107)=HEXCHR$("0202020202000201060606060600060F0606060606000201") 
DEFCHRS(108)=HEXCHR$("00F800000000000001FBFB010000000000F8F80000000000") 
DEFCHRS(109)=HEXCHR$("805F00000000000080DFDF8000000000805F1F0000000000") 
DEFCHRS(110)=HEXCHR$("000000000000000000000000000000000000000000000000") 
DEFCHRS(111)=HEXCHR$("000000000000000000000000000000000000000000000000") 
DEFCHRS(112)=HEXCHR$("00000000000000000000000000000000FEFDFAF5EAD5AA55") 
DEFCHRS(113)=HEXCHR$("552A150A05020100552A150A050201007F3F9F4FA753A954") 
DEFCHRS(114)=HEXCHR$("0000000000000000O00000000O0000007F7F7F7F7F7F7F7F"> 
DEFCHRS(115)=HEXCHR$("54AA54AA54AA54AA54AA54AA54AA54AAFEFEFEFEFEFEFEFE") 
DEFCHRS(116)=HEXCHR$("00000000000000000000000000000000AA55AA55AA55AA00") 
DEFCHRS(117)=HEXCHR$("00000000000000000000000000000000AA55AA55AA55AA00") 
DEFCHRS(118)=HEXCHR$("000000000O0000000000000000000000FFFFFFFFFFFFFFFF") 
DEFCHRS(119)=HEXCHR$("00000000000000000000000000000000FFFFFFFFFFFFFFFF") 
DEFCHRS(120)=HEXCHR$("20202000201700006060600060F7F7606060600020170700") 
DEFCHRS(121)=HEXCHR$("0202020002E100000606060006EFEF06060(>060002E1E000") 
DEFCHRS(122)=HEXCHR$("0000002020202020F0600060606060600000006060606060") 
DEFCHRS( 123)=HEXCHR$( " 00000002020202020F060006060606060000000606060606") 
DEFCHRS(124)=HEXCHR$("0000000000F800000000000001FBFB010000000000F8F800") 
DEFCHRS(125)=HEXCHR$( '00000000805F00000000000080DFDF8000000000805F1F00") 
DEFCHRS(126)=HEXCHR$("000000000000000000000000000000000000000000000000") 
DEFCHRS(127)=HEXCHR$("000000000000000000000000000000000000000000000000") 
DEFCHRS(128)=HEXCHR$("00000000000000000F3F7FFFFFFFFFFF0F30408080808080") 
DEFCHRS( 129)=HEXCHR$("0000000000000000F0FCFEFFFFFFFFFFF00C020101010101") 
DEFCHRS(130)=HEXCHR$("0000000OOO000OOOFFFFFFFFFFFFFFFFO000000000000000") 
DEFCHRS(131)=HEXCHR$("FFFF000000000000FFFFFFFFFFFFFFFFFFFF0O0000000000") 
DEFCHRS(132)=HEXCHR$("000000000000FFFFFFFFFFFFFFFFFFFF000O00000000FFFF") 
DEFCHRS(133)=HEXCHRS("C0C0C0C0C0C0C0C0FFFFFFFFFFFFFFFFC0C0C0C0C0C0C0C0") 
DEFCHRS(134)=HEXCHRS("03O3030303030303FFFFFFFFFFFFFFFF03030303030303O3") 
DEFCHRS(135)=HEXCHRS("FFFFC0C0C0C0C0C0FFFFFFFFFFFFFFFFFFFFC0C0C0C0C0C0") 
DEFCHRS(136)=HEXCHR$("FFFF030303030303FFFFFFFFFFFFFFFFFFFF03O303030303") 
DEFCHRS(137)=HEXCHR$("C0C0C0C0C0C0FFFFFFFFFFFFFFFFFFFFC0C0C0C0C0C0FFFF") 
DEFCHRS(138)=HEXCHR$("030303030303FFFFFFFFFFFFFFFFFFFF030303030303FFFF") 
DEFCHRS(139)=HEXCHR$("030F1C306060C0C0030F1F3F7F7FFFFF030F1C306060C0C0") 
DEFCHRS(140)=HEXCHR$("C0F0380C06060303C0F0F8FCFEFEFFFFC0F0380C06060303") 
DEFCHRS(141)=HEXCHR$("C0C06060301C0F03FFFF7F7F3F1F0F03C0C06060301C0F03") 
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DEFCHR$(142) 
DEFCHR$(143) 
DEFCHR$(144) 
DEFCHR$(145) 
DEFCHR$(146) 
DEFCHR$(147) 
DEFCHR$(148) 
DEFCHR$(149) 
DEFCHR$(150) 
DEFCHR$(151) 
DEFCHR$(152) 
DEFCHR$(153) 
DEFCHR$(154) 
DEFCHR$(155) 
DEFCHR$(156) 
DEFCHR${157) 
DEFCHR$(158) 
DEFCHR$(159) 
DEFCHR$(160) 
DEFCHR$(161) 
DEFCHR$(162) 
DEFCHR$(163) 
DEFCHR$(164) 
DEFCHR$(165) 
DEFCHR$(166) 
DEFCHR$(167) 
DEFCHR$(168) 
DEFCHR$(169) 
DEFCHR$(170) 
DEFCHR$(171) 
DEFCHR$(172) 
DEFCHR$(173) 
DEFCHR$(174) 
DEFCHR$(175) 
DEFCHR$(176) 
DEFCHR$(177) 
DEFCHR$(178) 
DEFCHR$(179) 
DEFCHR$(180) 
DEFCHR$(181) 
DEFCHR$(182) 
DEFCHR$(183) 
DEFCHR$(184) 
DEFCHR$(185) 
DEFCHR$(186) 
DEFCHR$(187) 
DEFCHR$(188) 
DEFCHR$(189) 
DEFCHR$(190) 
DEFCHR$(191) 
RETURN 


=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR${ 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 
=HEXCHR$( 


' 030306060C38F0C0FFFFFEFEFCF8F0C0030306060C38F0C0 


' 0000000000000000FFFFFFFF7F7F3F0F808080804040300F 
' 0000000000000000FFFFFFFFFEFEFCF00101010102020CF0 
' 0F3C7060C0C08080FFFCF0E0C0C080800F3C7 060C0C08080 
1 F03C0E0603030101FF3F0F0703030101F03C0E0603030101 
' 8080C0C060703C0F8080C0C0E0F0FCFF8080C0C060703C0F 
'01010303060E3CF00101030307 0F3FFF01010303060E3CF0 
' 03060C183060C080FFFEFCF8F0E0C08003060C183060C080 
' 80C06030180C060380C0E0F0F8FCFEFF80C06030180C0603 
' 0103060C183060C00103070F1F3F7FFF0103060C183060C0 
'C06030180C060301FF7F3F1F0F070301C06030180C060301 


' 01010202020480200000010101037F1F0000010101037F1F 
1 00000000000000038080C0C0C0E0FFFC8080C0C0C0E0FFFC 
00000100000000000140211003070F4F0140211003030703 
000004084020101000820408C0E0F0F000820408C0E0F0F0 
'0000500483878F8F00005004838580800000500483878F87 
00000000C0E0F0F000000000C0E0303000000000C0E0F0F0 
'000718000000000000071F3F6040000000071F3F60400000 
1 00E0181C0C0E0E0600E0F8FC7C3E3E3E00E0F8FC7C3E3E3E 
00000001000000000000000100000000000000070F1F1F1F 
'000000E07 0080808000000E070080808000000E0F0F8F8F8 
' 000000070F1FIF1F00000000000000000000000100000000 
' 000000E0F0F8F8F80000000000000000000000E070080808 
'0000000100000000000000070F1F1F1F0000000100000000 
'000000E070080808000000E0F0F8F8F8000000E070080808 
' 000000050A150A15000000070F1F1F1F000000050A150A15 
000000E0F058A858000000E0F0F8F8F8000000E0F058A858 
'08080810102020400707070E0C1810200707070E0C181020 
'0C00804020100804F0F07038180C0402F0F07038180C0402 
’ 0000000000000000AF0F0703102041008301000000004100 
0402000000000000F5F2E0C804820080F5F2600804020080 
'4F4723100804020040402010080402004543201008040200 
F0F0E4C0020202501000040002020250F0F0E44002020250 
’ 0000000000000000000040603F1F0700000040603F1F0700 
06060604000000003E3E7EFCFCF8E0003E3E7EFCFCF8E000 
' 00000000000000000000000000000000170F050B01000000 


' 0000000000000000170F050B010000000000000000000000 
' 0800000000000000F8F8F8B06-00000000800000000000000 
’ 0205000100000000170F050B010000000205000100000000 
' A850A81000000000F8F8F8B040000000A850A81000000000 
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10 CLEAR &HBA00:LOADM"STAR MON" 

20 INIT:CLS4:CGEN1:CLICK OFF 
30 FOR C=1 TO 7:COLOR C:FOR 1=0 TO 23 
40 SCREEN0,1 
50 I$=SCRN$(1,1,38) 

60 SCREEN0,0 
70 LOCATE 1,24:PRINTI$ 

80 IF STRIG(0) THEN 150 
90 NEXT 

100 LOCATE 12,24:COLOR 4:CFLASH 1:PRINT"PUSH SPACE KEY";:CFLASH 0 

110 FOR 1=0 TO 2000 

120 IF STRIG(0) THEN 150 

130 NEXT:NEXT:GOTO 30 

140 » 

150 M=0:LT=3:GOSUB 430 
160 CLS0 

170 LOCATE1,24:COLOR4:PRINT"STAGE "; 

180 COLOR5:PRINT" LEFT ";:COLOR7:PRINTRIGHT$(STR$(LT),2); 

190 COLOR6:PRINT" STARS "; 

200 COLOR2:PRINT"BALLS"; 

210 LOCATE 0,0:COLOR 7 

220 IF M>29 THEN 280 ELSE POKE &HEF89,M 
230 CALL &HED60 

240 IF PEEK(&HF8C0)=0 THEN M=M+1:LT=LT+PEEK(&HF8C2):GOTO 160 
250 LT=LT-1:IF LT<0 THEN 20 

260 IF PEEK(46)=27 THEN M=M+1:IF M>19 THEN M=19 

270 GOTO 160 

280 INIT:CLS4:CGEN1 

290 RESTORE 720:FOR 1=1 TO 4 

300 READ X,Y,I $ 

310 COLOR 1+2:LOCATE X,Y:’RINT 1$; 

320 FOR P=1 TO LEN(I $) 

330 PP$=MID$(I $,P,1) 

340 PRINTPP$; 

350 BEEP 
360 NEXT 
370 NEXT 
380 PLAY 300 

390 PLAY"04V15#D3D3E3#E7#D3+#D3B8#B3B3A8G3E3G3G8" 

400 READ X,Y,I$:COLOR 7:LOCATE X,Y:CSIZE 1:PRINTfrO,I $:COLOR 4,0:CFLASH 1 
410 LOCATE12,23:PRINT"PUSH SPACE KEY" 

420 IF STRIG(0) THEN 20 ELSE 420 
430 COLOR7 
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440 RESTORE 470:FOR 1=0 TO 23 
450 READ 1$:LOCATE 32,1:PRINT 1$ 

460 NEXT:RETURN 
470 nArr *" " 

480 nATV'c; 

4 90 r>ATA "—t 
500 hata" 

510 nATA" A ■" 

520 nATA" 

530 n ata " u 
54 0 nATA "a 

550 DATA"__a" 

560 DATA"—N——■" 

570 nATA" 

580 nATA" 

590 DATA"— 

600 hata" ■- 

610 DATA"- _JT 
620 DATA’’- — 

630 DATA'- _ CM" 

640 DATA’- 

6 50 nATA *' —— v -- 

660 DATA”- ■” 

6 70 DATA’’- — 

680 DATA”- . • ■ 

690 DATA"- xt ■" 

700 DAT A " Haad " 

710 » 

720 DATA 12,0,"YOU ARE GREAT!" 

730 DATA 1,3,"AND fSTARS* SHINE IN THE SKY AGAIN 
740 DATA 4,5,"EVERY LIVING THING IS GLAD TO" 

750 DATA 10,7,"SEE THE *STARS*.“ 

760 DATA 5,10,"THE END _ GATERING *STARS-" 
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00 

00 

0F 

03 

IE 

BA28 

00 

00 

00 

00 

0F 

10 

00 

00 

IF 

BBA8 

04 

04 

02 

01 

02 

04 

04 

04 

19 

BD28 

10 

00 

0E 

0E 

02 

05 

05 

02 

3A 

BA30 

00 

00 

00 

02 

04 

02 

00 

00 

08 

BBB0 

04 

04 

02 

03 

00 

00 

00 

00 

0D 

BD30 

0E 

0E 

0E 

0E 

0E 

0E 

02 

10 

66 

BA38 

00 

00 

00 

0F 

10 

00 

00 

00 

IF 

BBB8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

BD38 

00 

06 

0 2 

02 

02 

00 

0 2 

02 

10 

BA40 

00 

00 

00 

00 

00 

00 

00 

00 

00 

BBC0 

00 

03 

03 

00 

00 

00 

00 

00 

06 

BD40 

02 

02 

02 

0 0 

02 

02 

02 

06 

12 

BA48 

00 

00 

0F 

10 

00 

00 

00 

00 

IF 

BBC8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

BD48 

00 

02 

00 

00 

02 

00 

00 

00 

04 

BA50 

00 

00 

06 

00 

00 

00 

00 

00 

06 

BBD0 

03 

03 

00 

06 

06 

06 

00 

00 

18 

BD50 

00 

00 

02 

0 0 

00 

02 

0 0 

00 

04 

BA58 

00 

0F 

10 

00 

00 

00 

00 

00 

IF 

BBD8 

00 

00 

00 

06 

06 

06 

00 

03 

15 

BD58 

00 

02 

02 

00 

00 

00 

00 

00 

04 

BA60 

00 

21 

00 

00 

00 

00 

00 

00 

21 

BBE0 

02 

00 

00 

00 

00 

00 

0E 

0E 

IE 

BD60 

00 

00 

02 

02 

00 

00 

00 

00 

04 

BA68 

0F 

10 

00 

00 

00 

00 

00 

02 

21 

BBE8 

0E 

00 

00 

00 

00 

00 

02 

00 

10 

BD68 

02 

00 

00 

00 

00 

00 

00 

00 

02 

BA 70 

04 

02 

00 

00 

00 

00 

00 

0F 

15 

BBF0 

02 

00 

00 

00 

0 0 

00 

02 

00 

04 

BD70 

00 

00 

02 

00 

00 

00 

00 

02 

04 

BA 7 8 

10 

00 

00 

00 

00 

00 

00 

00 

10 

BBF8 

00 

00 

00 

00 

02 

00 

00 

01 

03 

BD78 

00 

00 

00 

06 

00 

06 

00 

00 

0C 

SUM: 

25 

46 

29 

25 

27 

25 

39 

21 1 

J 178 

SUM: 

25 

16 

0F 

18 

37 

18 

IE 

22 4E31 

SUM: 

3F 

39 

45 

31 

2C 

31 

22 

38 D07A 

BA80 

00 

00 

00 

00 

00 

00 

0F 

10 

IF 

BC00 

00 

00 

02 

00 

00 

07 

00 

00 

09 

BD80 

00 

02 

00 

00 

00 

00 

02 

00 

04 

BA88 

00 

00 

00 

00 

00 

00 

06 

00 

06 

BC08 

02 

00 

00 

01 

00 

00 

02 

00 

05 

BD88 

00 

00 

00 

00 

00 

00 

00 

00 

00 

BA90 

00 

00 

00 

00 

00 

0F 

02 

02 

13 

BC10 

00 

06 

00 

00 

02 

0 0 

00 

06 

0E 

BD90 

02 

00 

00 

00 

01 

01 

01 

01 

06 

BA98 

02 

02 

02 

02 

00 

00 

00 

02 

0A 

BC18 

00 

00 

02 

00 

0 0 

01 

00 

00 

03 

BD98 

00 

00 

01 

00 

00 

01 

01 

01 

04 

BAA0 

02 

02 

02 

0 2. 

02 

02 

23 

00 

2F 

BC20 

02 

00 

00 

07 

00 

00 

02 

00 

0B 

BDA0 

01 

00 

00 

00 

00 

01 

00 

00 

02 

BAA8 

02 

04 

04 

04 

04 

04 

04 

04 

IE 

BC28 

00 

01 

00 

00 

02 

00 

00 

06 

09 

BDA8 

00 

06 

00 

00 

00 

01 

00 

00 

07 

BAB0 

04 

04 

04 

02 

03 

00 

00 

03 

14 

BC30 

00 

00 

02 

0 0 

00 

06 

00 

00 

08 

BDB0 

00 

00 

00 

01 

00 

02 

10 

00 

13 

BAB8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

BC38 

02 

00 

00 

01 

00 

00 

0 2 

00 

05 

BDB8 

21 

00 

0F 

02 

00 

01 

00 

00 

33 

BAC0 

00 

00 

03 

03 

00 

00 

03 

00 

09 

BC40 

00 

21 

00 

00 

02 

00 

00 

01 

24 

BDC0 

00 

00 

00 

00 

00 

0 2 

02 

02 

06 

BAC8 

00 

02 

04 

04 

04 

04 

02 

00 

14 

BC48 

00 

00 

02 

00 

00 

06 

00 

00 

08 

BDC8 

02 

02 

00 

00 

00 

00 

00 

00 

04 

BAD0 

00 

03 

03 

06 

00 

03 

00 

00 

0F 

BC50 

02 

00 

0 0 

06 

0 0 

00 

02 

00 

0A 

BDD0 

00 

00 

00 

00 

11 

11 

11 

11 

44 

BAD8 

03 

00 

00 

00 

00 

03 

00 

00 

06 

BC58 

00 

01 

00 

00 

02 

00 

00 

07 

0A 

BDD8 

11 

00 

00 

00 

00 

00 

06 

06 

ID 

BAE0 

03 

03 

06 

00 

03 

00 

00 

03 

12 

BC60 

00 

00 

02 

00 

00 

01 

00 

00 

03 

BDE0 

06 

06 

06 

06 

06 

06 

06 

06 

30 

BAE8 

09 

02 

00 

00 

03 

00 

00 

03 

11 

BC68 

0 2 

00 

00 

06 

00 

00 

02 

00 

0A 

BDE8 

06 

06 

00 

06 

0F 

00 

02 

04 

27 

BAF0 

03 

00 

00 

03 

00 

00 

02 

04 

0C 

BC70 

00 

06 

00 

00 

02 

00 

00 

01 

09 

BDF0 

04 

04 

04 

04 

04 

04 

04 

04 

20 

BAF8 

02 

00 

00 

03 

00 

00 

03 

03 

0B 

BC78 

00 

00 

02 

00 

00 

07 

00 

00 

09 

BDF8 

04 

02 

00 

0F 

06 

03 

06 

06 

2A 

SUM: 

IE 

16 

1C 

ID 

13 

IF 

48 

28 870B 

SUM: 

0A 

2F 

0C 

15 

0A 

1C 

0A 

15 50F7 

SUM: 

4B 

1C 

1A 

22 

31 

27 

3F 

2F C644 

BB00 

00 

00 

03 

00 

00 

00 

00 

00 

03 

BC80 

02 

00 

00 

01 

00 

00 

02 

00 

05 

BE00 

06 

06 

06 

06 

06 

06 

06 

06 

30 

BB08 

00 

00 

03 

00 

00 

03 

03 

00 

09 

BC88 

00 

00 

oo 

00 

02 

00 

00 

00 

02 

BE08 

06 

06 

0F 

06 

03 

06 

00 

00 

2A 

BB 10 

00 

02 

04 

04 

04 

04 

04 

04 

1A 

BC90 

00 

00 

02 

00 

00 

0 0 

01 

‘06 

09 

BE10 

0 0 

00 

00 

00 

00 

00 

00 

00 

00 

BB18 

04 

02 

00 

00 

03 

03 

00 

00 

0C 

BC98 

00 

00 

00 

00 

00 

00 

00 

00 

00 

BE 18 

00 

00 

06 

03 

06 

00 

00 

00 

0F 

BB20 

00 

00 

00 

06 

06 

06 

00 

00 

12 

BCA0 

00 

06 

01 

00 

00 

00 

00 

00 

07 

BE20 

00 

21 

00 

00 

00 

00 

00 

00 

21 

BB28 

00 

00 

00 

03 

03 

00 

00 

00 

06 

BCA8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

BE28 

00 

06 

03 

06 

06 

06 

06 

06 

27 

BB30 

00 

00 

00 

00 

00 

00 

00 

00 

00 

BCB0 

00 

00 

00 

00 

00 

00 

01 

06 

07 

BE30 

06 

06 

06 

06 

06 

06 

00 

06 

2A 

BB38 

00 

00 

03 

02 

04 

04 

04 

04 

15 

BCB8 

00 

00 

00 

00 

00 

06 

01 

00 

07 

BE38 

06 

02 

04 

04 

04 

04 

04 

04 

20 

BB40 

04 

04 

04 

04 

04 

04 

04 

04 

20 

BCC0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

BE40 

04 

04 

04 

04 

02 

06 

00 

06 

IE 

BB48 

04 

02 

02 

00 

00 

00 

00 

00 

08 

BCC8 

00 

00 

0 0 

00 

00 

00 

00 

00 

00 

BE48 

03 

00 

00 

00 

00 

31 

00 

34 

BB50 

11 

11 

11 

00 

00 

00 

00 

00 

33 

BCD0 

00 

00 

00 

00 

00 

00 

01 

06 

07 

BE50 

00 

00 

00 

03 

06 

00 

06 

03 

12 

BB58 

02 

03 

00 

06 

06 

06 

00 

00 

17 

BCD8 

00 

06 

01 

00 

00 

00 

00 

00 

07 

BE58 

0 0 

00 

00 

00 

00 

00 

00 

00 

00 

BB60 

00 

00 

00 

06 

06 

06 

00 

03 

15 

BCE0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

BE60 

0 0 

00 

03 

06 

00 

06 

03 

00 

12 

BB68 

03 

00 

00 

00 

00 

00 

00 

00 

03 

BCE8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

BE68 

00 

00 

00 

0 0 

41 

00 

00 

00 

41 

BB70 

00 

00 

00 

00 

00 

00 

03 

03 

06 

BCF0 

00 

00 

00 

21 

00 

00 

01 

00 

22 

BE7 0 

0 0 

03 

06 

00 

06 

02 

04 

04 

19 

BB78 

00 

00 

00 

00 

00 

00 

00 

00 

00 

BCF8 

00 

00 

0E 

00 

00 

00 

0F 

02 

IF 

BE7 8 

04 

04 

04 

04 

04 

0 4 

04 

04 

20 

SUM: 

22 

IE 

24 

IF 

24 

24 

12 

12 5F82 

SUM: 

02 

0C 

12 

22 

02 

06 

16 

14 4 5B9 

SUM: 

23 

46 

39 

30 

72 

2E 

52 

27 6941 
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BE80 

02 

06 

00 

31 

00 

00 

00 

00 


39 

C1 30 

07 

07 

07 

00 

0 0 

31 

02 

02 

4 A 

C3E0 

00 

07 

02 

00 

00 

00 

00 

00 : 

09 

BE88 

00 

00 

00 

00 

00 

00 

00 

00 


00 

C1 38 

02 

02 

02 

02 

00 

02 

02 

02 

0E 

C3E8 

00 

00 

01 

00 

01 

00 

00 

00 : 

02 

BE90 

00 

00 

00 

00 

00 

0 0 

00 

00 


00 

Cl 40 

02 

02 

02 

31 

00 

00 

06 

06 

43 

C3F0 

01 

00 

00 

02 

00 

00 

00 

00 : 

03 

BE98 

00 

00 

00 

00 

00 

00 

00 

00 


00 

Cl 48 

06 

06 

06 

02 

06 

06 

06 

06 

2C 

C3F8 

02 

07 

02 

00 

01 

21 

01 

00 : 

2E 

BEA0 

00 

00 

0 0 

00 

00 

01 

00 

00 


01 

C150 

06 

00 

00 

00 

02 

02 

0 2 

02 

0E 











BEA8 

00 

00 

00 

00 

01 

00 

00 

00 


01 

Cl 58 

02 

02 

01 

02 

02 

02 

02 

02 

0F 

SUM: 

29 

2E 

1A 

27 

59 

56 

27 

IE FAF4 

BEB0 

00 

00 

00 

01 

09 

01 

00 

00 


OB 

C 160 

02 

00 

00 

00 

00 

00 

00 

00 

02 











BEB8 

00 

00 

01 

07 

01 

00 

00 

0 0 


09 

Cl 68 

00 

21 

00 

00 

00 

00 

00 

00 

21 

C400 

00 

07 

02 

00 

00 

00 

00 

02 : 

0B 

BEC0 

00 

00 

00 

01 

00 

02 

00 

00 


03 

C170 

00 

00 

02 

02 

02 

02 

02 

02 

0C 

C408 

00 

00 

02 

00 

01 

00 

02 

00 : 

05 

BEC8 

00 

00 

01 

00 

00 

00 

0 0 

00 


01 

Cl 78 

00 

02 

02 

02 

02 

02 

02 

00 

0C 

C410 

02 

00 

00 

00 

00 

00 

00 

02 : 

04 

BED0 

00 

00 

0 0 

00 

00 

02 

00 

00 


02 











C418 

00 

07 

00 

01 

00 

07 

00 

00 : 

0F 

BED8 

00 

02 

00 

00 

00 

00 

00 

01 


03 

SUM: 

27 

42 

22 

47 

13 

44 

5A 

41 4304 

C420 

02 

00 

00 

00 

00 

00 

00 

02 : 

04 

BEE0 

00 

00 

00 

00 

00 

02 

00 

02 


04 











C428 

02 

00 

01 

00 

02 

02 

00 

00 : 

07 

BEE8 

00 

00 

02 

o B 

00 

01 

06 

01 


15 

C180 

00 

00 

09 

09 

09 

09 

09 

02 

2F 

C430 

00 

00 

00 

00 

00 

00 

00 

00 : 

; 00 

BEF0 

00 

00 

01 

00 

02 

21 

02 

00 


26 

C188 

09 

09 

09 

09 

09 

0 0 

00 

00 

2D 

C438 

00 

01 

00 

00 

00 

00 

00 

00 : 

: 01 

BEF8 

02 

00 

00 

00 

00 

01 

00 

00 


03 

C190 

02 

02 

02 

02 

02 

02 

00 

02 

OE 

C440 

00 

00 

41 

0 0 

00 

00 

00 

01 : 

: 42 












C198 

02 

02 

02 

02 

0 2 

00 

00 

00 

0A 

C448 

0 0 

01 

00 

00 

00 

00 

00 

41 : 

: 42 

SUM: 

04 

08 

05 

45 

0D 

2B 

08 

04 

CD94 

C1A0 

08 

08 

08 

08 

00 

43 

00 

08 

6B 

C450 

00 

00 

00 

00 

00 

00 

00 

00 ; 

: 00 












C1A8 

08 

08 

08 

00 

00 

02 

02 

02 

IE 

C458 

0 0 

01 

00 

00 

06 

(Hi 

06 

00 : 

: 13 

BF00 

01 

08 

01 

00 

02 

02 

00 

00 


0E 

C1B0 

02 

02 

02 

00 

02 

00 

02 

02 

0C 

C460 

00 

00 

00 

00 

00 

00 

21 

00 : 

: 21 

BF08 

00 

00 

00 

00 

00 

02 

02 

00 


04 

C1B8 

02 

02 

02 

02 

00 

01 

00 

00 

09 

C468 

01 

00 

00 

06 

06 

06 

02 

02 : 

: 17 

BF10 

01 

00 

02 

00 

02 

00 

00 

00 


05 

C1C0 

0 0 

00 

0 0 

00 

00 

00 

00 

21 

21 

C470 

02 

0 0 

06 

02 

02 

02 

02 

01 : 

: 11 

BF18 

00 

00 

00 

00 

0 0 

00 

00 

0 0 


00 

C1C8 

00 

00 

00 

00 

00 

0E 

04 

04 

16 

C478 

00 

00 

02 

02 

02 

02 

05 

05 : 

: 12 

BF20 

00 

00 

00 

0 0 

00 

00 

00 

00 


00 

C1D0 

02 

00 

0 0 

0 0 

02 

04 

04 

04 

10 











BF28 

01 

00 

01 

00 

00 

00 

00 

21 


23 

C1D8 

02 

00 

00 

0F 

05 

05 

05 

03 

23 

SUM: 

09 

11 

4E 

0B 

13 

19 

32 

50 F13E 

BF30 

00 

00 

00 

00 

0 0 

00 

00 

00 


00 

C1E0 

00 

00 

00 

03 

05 

05 

05 

03 

15 











BF38 

00 

02 

04 

04 

04 

04 

04 

04 


1A 

C1E8 

00 

00 

02 

04 

04 

04 

02 

00 

10 

C480 

02 

06 

02 

05 

02 

00 

01 

00 

12 

BF40 

04 

04 

04 

02 

00 

00 

00 

00 


0E 

C1F0 

0 0 

00 

02 

11 

11 

11 

02 

00 

37 

C488 

02 

05 

05 

02 

00 

02 

05 

05 

1A 

BF48 

03 

0 0 

0 0 

0 0 

00 

00 

00 

00 


03 

C1F8 

00 

00 

00 

00 

02 

00 

00 

00 

02 

C490 

02 

00 

02 

00 

00 

01 

00 

00 

05 

RF50 

00 

00 

03 

00 

00 

00 

00 

03 


06 











C498 

02 

05 

02 

00 

00 

02 

05 

05 

15 

BF58 

00 

00 

01 

00 

00 

00 

01 

00 


02 

SUM: 

25 

21 

2E 

47 

3B 

82 

23 

3F E342 

C4A0 

02 

00 

00 

31 

01 

00 

00 

02 

36 

BF60 

00 

03 

00 

00 

00 

00 

03 

00 


06 











C4A8 

05 

02 

00 

00 

00 

02 

05 

05 

13 

BF68 

00 

00 

09 

09 

09 

00 

00 

00 


IB 

C200 

01 

00 

00 

00 

00 

00 

00 

06 : 

: 07 

C4B0 

02 

00 

00 

01 

00 

00 

0 2 

05 

0A 

BF7 0 

03 

00 

00 

00 

00 

03 

44 

00 


4A 

C208 

06 

06 

06 

03 

00 

00 

41 

00 : 

: 56 

C4B8 

02 

00 

00 

02 

00 

02 

05 

05 

10 

BF7 8 

00 

09 

00 

09 

00 

00 

00 

03 


15 

C210 

00 

00 

00 

00 

06 

02 

00 

00 : 

: 08 

C4C0 

02 

00 

01 

0 0 

00 

02 

06 

02 

0C 












C218 

00 

06 

03 

00 

0E 

0E 

0E 

02 : 

: 35 

C4C8 

00 

02 

05 

02 

06 

02 

05 

05 

IB 

SUM*. 

0D 

1A 

19 

18 

11 

0B 

4E 

2B 

E3CC 

C220 

02 

02 

02 

00 

00 

06 

09 

02 : 

: 17 

C4D0 

02 

01 

00 

00 

02 

05 

02 

02 

0E 












C228 

06 

03 

02 

0 4 

04 

04 

0 2 

05 : 

: IE 

C4D8 

02 

02 

02 

06 

00 

02 

02 

02 

12 

BF80 

00 

00 

00 

00 

03 

00 

00 

00 


03 

C230 

05 

05 

02 

00 

00 

02 

03 

06 : 

: 17 

C4E0 

.01 

00 

02 

02 

02 

02 

00 

00 

09 

BF88 

09 

09 

09 

00 

00 

00 

03 

00 


IE 

C238 

03 

02 

04 

04 

04 

02 

0 5 

05 : 

: ID 

C4E8 

00 

00 

00 

00 

00 

00 

00 

01 

01 

BF90 

00 

00 

00 

02 

00 

00 

01 

00 


03 

C240 

02 

03 

00 

00 

06 

03 

00 

11 : 

: IF 

C4F0 

00 

00 

00 

00 

31 

02 

04 

04 

3B 

BF98 

00 

00 

01 

00 

00 

03 

00 

00 


04 

C248 

09 

00 

11 

00 

09 

11 

11 

00 : 

: 45 

C4F8 

04 

02 

00 

00 

00 

02 

04 

04 

10 

BFA0 

00 

00 

00 

00 

00 

41 

00 

01 


42 

C250 

11 

00 

0 0 

00 

02 

00 

0 0 

00 : 

: 13 











BFA8 

00 

00 

00 

00 

03 

00 

00 

00 


03 

C258 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

SUM: 

IE 

19 

15 

45 

3E 

1A 

2D 

2F CD3B 

BFB0 

00 

02 

04 

04 

0 4 

02 

00 

02 


12 

C260 

00 

06 

02 

06 

02 

06 

02 

06 : 

: IE 











BFB8 

04 

04 

04 

02 

00 

00 

00 

00 


: 0E 

C268 

02 

02 

02 

00 

06 

06 

02 

23 : 

: 37 

C500 

04 

02 

00 

00 

03 

00 

00 

00 

09 

BFC0 

00 

00 

00 

00 

00 

00 

00 

00 


: 00 

C270 

06 

02 

06 

00 

06 

02 

06 

00 

: 1C 

C508 

03 

00 

02 

00 

03 

00 

00 

00 

08 

BFC8 

00 

00 

00 

00 

00 

00 

00 

0 0 


: 00 

C278 

00 

02 

00 

02 

02 

0 2 

00 

06 : 

: 0E 

C510 

03 

00 

00 

03 

00 

02 

00 

03 

0B 

BFD0 

00 

00 

00 

0 6 

06 

00 

00 

00 


: 0C 











C518 

00 

03 

00 

03 

00 

02 

00 

03 

0B 

BFD8 

00 

00 

00 

00 

00 

00 

00 

00 


: 00 

SUM: 

3B 

27 

2E 

13 

3D 

42 

7D 

5A E284 

C520 

00 

00 

03 

00 

03 

00 

03 

00 

09 

BFE0 

00 

06 

02 

06 

00 

00 

00 

00 


: 0E 











C528 

03 

00 

03 

00 

03 

00 

03 

00 

0C 

BFE8 

00 

00 

00 

00 

00 

00 

00 

00 


: 00 

C280 

02 

02 

02 

00 

02 

02 

02 

00 

0C 

C530 

00 

03 

00 

03 

00 

03 

00 

03 

0C 

BFF0 

06 

02 

06 

00 

00 

21 

00 

00 


: 2F 

C288 

02 

00 

02 

02 

00 

00 

00 

00 

06 

C538 

00 

03 

00 

03 

00 

03 

00 

00 

09 

BFF8 

00 

00 

00 

00 

02 

02 

02 

02 


: 08 

C290 

00 

00 

00 

00 

41 

00 

00 

00 

41 

C540 

03 

00 

03 

42 

03 

42 

03 

42 

D2 












C298 

00 

02 

00 

00 

02 

02 

00 

02 

08 

C548 

03 

42 

03 

00 

03 

22 

00 

03 

70 

SUM: 

13 

17 

1A 

14 

12 

69 

06 

05 

36E2 

C2A0 

02 

02 

02 

02 

02 

02 

02 

02 

10 

C550 

00 

03 

00 

03 

00 

03 

00 

03 

0C 












C2A8 

02 

00 

02 

02 

00 

00 

00 

00 

06 

C558 

00 

03 

00 

03 

00 

00 

03 

00 

09 

C000 

02 

02 

02 

02 

02 

00 

00 

00 


0A 

C2B0 

02 

06 

02 

06 

31 

00 

02 

00 

43 

C560 

03 

00 

03 

00 

0 3 

00 

03 

00 

0C 

C008 

00 

00 

00 

00 

00 

00 

06 

02 


08 

C2B8 

00 

00 

02 

00 

02 

02 

00 

02 

08 

C568 

03 

00 

03 

00 

00 

03 

00 

03 

0C 

C010 

00 

00 

00 

02 

00 

00 

00 

00 


02 

C2C0 

06 

02 

06 

02 

00 

02 

0 2 

00 

14 

C570 

00 

03 

00 

03 

00 

02 

00 

03 

0B 

C018 

00 

00 

01 

00 

00 

06 

02 

00 


09 

C2C8 

02 

02 

31 

02 

00 

00 

02 

06 

3F 

C578 

00 

03 

00 

00 

02 

0 0 

03 

00 

08 

C020 

00 

00 

02 

00 

00 

00 

00 

00 


02 

C2D0 

06 

06 

02 

00 

02 

00 

0 0 

00 

10 











C028 

00 

00 

00 

00 

06 

02 

00 

32 


3A 

C2D8 

02 

00 

02 

00 

02 

02 

02 

02 

0C 

SUM: 

19 

59 

14 

57 

17 

76 

12 

57 F9B3 

C030 

00 

02 

00 

00 

00 

00 

00 

00 


02 

C2E0 

02 

02 

00 

02 

00 

02 

00 

02 

0A 











C038 

00 

00 

00 

02 

06 

00 

00 

00 


08 

C2E8 

00 

02 

00 

00 

00 

00 

00 

00 

02 

C580 

02 

00 

03 

00 

00 

00 

03 

00 

08 

C040 

02 

00 

00 

00 

00 

0 0 

00 

00 


02 

C2F0 

00 

00 

00 

00 

02 

00 

02 

00 

04 

C588 

02 

00 

0C 

07 

00 

02 

00 

00 

17 

C048 

00 

02 

06 

00 

00 

00 

00 

06 


0E 

C2F8 

00 

06 

02 

00 

02 

00 

00 

02 

0C 

C590 

00 

02 

04 

02 

00 

02 

00 

00 

0A 

C050 

0 2 

00 

00 

00 

00 

00 

02 

02 


06 











C598 

00 

00 

00 

00 

00 

00 

00 

00 

00 

C058 

06 

00 

00 

0 0 

00 

00 

00 

06 


0C 

SUM: 

1C 

20 

49 

12 

82 

0E 

0E 

12 CE40 

C5A0 

00 

01 

00 

00 

00 

00 

00 

00 

01 

C060 

02 

02 

00 

00 

00 

00 

00 

00 


04 











C5A8 

00 

06 

06 

06 

02 

06 

06 

06 

26 

C068 

0 0 

00 

00 

00 

00 

00 

00 

00 


00 

C300 

02 

02 

06 

00 

06 

02 

01 

11 

24 

C5B0 

00 

06 

06 

06 

06 

06 

06 

06 

2A 

C070 

00 

00 

00 

00 

00 

0D 

00 

00 


0D 

C308 

11 

11 

11 

11 

11 

11 

11 

11 

88 

C5B8 

02 

02 

02 

02 

02 

02 

0 2 

00 

0E 

C078 

00 

00 

00 

00 

00 

00 

00 

00 


00 

C310 

1 1 

11 

11 

11 

01 

10 

00 

00 

55 

C5C0 

02 

02 

02 

02 

02 

02 

02 

02 

10 












C318 

00 

00 

00 

00 

21 

00 

00 

00 

21 

C5C8 

00 

00 

02 

00 

0 0 

02 

00 

02 

06 

SUM: 

0E 

08 

0B 

06 

0E 

15 

0A 

42 

34E5 

C320 

00 

00 

00 

0F 

10 

00 

00 

00 

IF 

C5D0 

31 

02 

00 

02 

31 

02 

02 

00 

6A 












C328 

00 

00 

06 

00 

06 

00 

00 

00 

0C 

C5D8 

00 

02 

00 

00 

02 

00 

02 

02 

08 

C080 

00 

00 

00 

00 

00 

00 

00 

00 


00 

C330 

00 

00 

0F 

10 

00 

06 

00 

00 

25 

C5E0 

02 

02 

02 

02 

02 

02 

41 

00 

4D 

C088 

01 

01 

01 

01 

01 

01 

01 

00 


07 

C338 

02 

04 

0 4 

04 

02 

00 

00 

06 

16 

C5E8 

02 

41 

00 

02 

21 

02 

0 0 

00 

68 

C090 

01 

01 

01 

01 

01 

01 

01 

0 8 


0F 

C340 

00 

0F 

10 

00 

00 

00 

00 

03 

22 

C5F0 

02 

0 0 

00 

02 

02 

02 

02 

02 

0C 

C098 

00 

00 

00 

00 

00 

08 

00 

08 


10 

C348 

05 

05 

05 

03 

00 

00 

00 

00 

12 

C5F8 

02 

0 2 

02 

00 

02 

00 

00 

02 

0A 

C0A0 

00 

00 

00 

00 

00 

08 

01 

0 1 


0A 

C350 

0F 

10 

00 

06 

00 

00 

03 

05 

2D 











C0A8 

01 

01 

01 

01 

01 

00 

01 

01 


07 

C358 

02 

05 

03 

00 

00 

06 

00 

0F 

IF 

SUM: 

41 

5C 

29 

21 

66 

IE 

5A 

16 DD3A 

C0B0 

01 

01 

01 

01 

01 

08 

00 

00 


0D 

C360 

10 

00 

00 

00 

00 

03 

05 

05 

ID 











C0B8 

00 

00 

00 

08 

00 

08 

00 

00 


10 

C368 

05 

03 

00 

00 

00 

00 

0F 

10 

27 

C600 

00 

00 

02 

06 

06 

06 

02 

06 

1C 

C0C0 

00 

00 

00 

08 

01 

01 

01 

01 


0C 

C370 

00 

00 

00 

00 

02 

04 

04 

04 

0E 

C608 

06 

06 

00 

02 

00 

02 

02 

02 

14 

C0C8 

01 

01 

01 

00 

01 

01 

01 

01 


07 

C378 

02 

00 

00 

00 

00 

0F 

10 

00 

21 

C610 

00 

02 

00 

00 

00 

02 

00 

00 

04 

C0D0 

01 

01 

01 

08 

00 

00 

00 

00 


0B 











C618 

00 

00 

02 

00 

00 

00 

00 

00 

02 

C0D8 

00 

08 

00 

08 

00 

0 0 

00 

00 


10 

SUM: 

53 

54 

59 

4E 

53 

45 

3D 

58 6CEE 

C620 

02 

00 

00 

00 

02 

00 

00 

00 

04 

C0E0 

00 

0 8 

0 1 

01 

01 

01 

01 

0 1 


0E 











C628 

00 

02 

00 

00 

00 

00 

00 

02 

04 

C0E8 

01 

00 

01 

01 

01 

01 

01 

01 


07 

C380 

02 

00 

0 0 

00 

06 

00 

06 

00 

0E 

C630 

00 

0 0 

00 

06 

00 

00 

00 

00 

06 

C0F0 

01 

08 

00 

00 

00 

00 

00 

08 


11 

C388 

00 

00 

02 

00 

0F 

10 

00 

00 

21 

C638 

06 

00 

00 

00 

00 

00 

06 

11 

ID 

C0F8 

00 

08 

00 

00 

00 

00 

00 

08 


10 

C390 

00 

00 

00 

00 

31 

00 

00 

00 

31 

C640 

11 

11 

11 

11 

11 

11 

11 

11 

88 












C398 

00 

00 

00 

0F 

01 

0E 

0E 

0E 

3A 

C648 

11 

11 

11 

11 

11 

11 

00 

02 

68 

S\M: 

08 

26 

08 

26 

08 

26 

08 

26 

AF27 

C3A0 

0E 

0E 

0E 

0E 

0E 

0E 

0E 

0E 

70 

C650 

00 

00 

00 

00 

00 

00 

00 

00 

00 












C3A8 

0E 

0E 

01 

00 

0 0 

00 

00 

00 

ID 

C658 

00 

00 

00 

00 

00 

00 

02 

00 

02 

C100 

01 

01 

01 

01 

01 

01 

01 

01 


: 08 

C3B0 

00 

02 

02 

02 

00 

02 

00 

00 

08 

C660 

02 

00 

31 

00 

02 

00 

00 

02 

37 

C108 

00 

0 0 

00 

00 

00 

00 

00 

21 


: 21 

C3B8 

00 

00 

00 

00 

00 

00 

02 

00 

02 

C668 

02 

02 

00 

00 

00 

02 

00 

02 

08 

Cl 10 

00 

00 

00 

00 

00 

00 

00 

02 


: 02 

C3C0 

00 

00 

00 

02 

00 

00 

00 

00 

02 

C670 

00 

00 

0 0 

02 

00 

02 

00 

00 

04 

Cl 18 

02 

02 

02 

02 

02 

00 

41 

0 0 


: 4B 

C3C8 

00 

00 

00 

02 

00 

07 

02 

00 

0B 

C678 

0 3 

00 

00 

00 

02 

00 

02 

00 

06 

C120 

02 

02 

02 

02 

0 2 

02 

00 

00 


: 0C 

C3D0 

08 

02 

00 

00 

02 

00 

00 

00 

0C 











Cl 28 

07 

07 

07 

07 

00 

00 

00 

07 


: 23 

C3D8 

00 

00 

02 

02 

00 

00 

00 

02 

06 

SUM: 

36 

2E 

57 

32 

2E 

30 

IF 

32 1FE5 
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C680 

02 

00 

02 

00 

02 

00 

00 

02 


08 

C688 

00 

00 

00 

02 

00 

00 

02 

00 


04 

C690 

02 

00 

00 

00 

02 

02 

00 

02 


08 

C698 

00 

00 

09 

00 

00 

09 

00 

09 


IB 

C6A0 

21 

00 

00 

09 

00 

00 

09 

00 


33 

C6A8 

00 

02 

00 

02 

00 

00 

00 

02 


06 

C6B0 

00 

00 

00 

00 

00 

00 

00 

00 


00 

C6B8 

02 

02 

00 

02 

00 

02 

02 

02 


0C 

C6C0 

00 

00 

00 

00 

00 

00 

00 

02 


02 

C6C8 

00 

0 0 

02 

00 

00 

02 

00 

00 


04 

C6D0 

31 

00 

00 

00 

00 

0E 

02 

0E 


4F 

C6D8 

0E 

02 

0E 

0E 

02 

02 

0E 

0E 


4C 

C6E0 

OK 

0E 

0E 

0E 

00 

0 0 

00 

00 


38 

C6E8 

00 

00 

00 

21 

00 

0 0 

00 

00 


21 

C6F0 

00 

00 

00 

0 0 

00 

02 

00 

00 


02 

C6F8 

00 

00 

00 

00 

00 

00 

00 

06 


06 

SUM: 

74 

14 

29 

4C 

06 

21 

ID 

35 

32E2 

C700 

00 

00 

00 

02 

02 

02 

0D 

02 


15 

C708 

0D 

01) 

02 

0D 

02 

00 

02 

06 


33 

C710 

06 

00 

00 

02 

0D 

0D 

02 

0D 


31 

C718 

0D 

02 

0D 

02 

02 

00 

02 

00 


22 

C720 

00 

00 

02 

0D 

0D 

02 

0D 

02 


2D 

C728 

02 

0D 

02 

00 

00 

06 

00 

00 


17 

C730 

00 

02 

02 

0D 

0D 

02 

0D 

02 


2F 

C738 

0D 

02 

00 

0 0 

00 

31 

00 

06 


46 

C740 

00 

00 

00 

00 

00 

00 

00 

00 


00 

C748 

00 

00 

00 

00 

00 

00 

00 

02 


02 

C750 

09 

09 

09 

09 

09 

02 

02 

0D 


3E 

C758 

00 

02 

02 

02 

00 

00 

02 

02 


0A 

C760 

02 

0D 

0D 

02 

0B 

0B 

02 

00 


36 

C768 

03 

03 

03 

00 

00 

02 

0C 

0C 


23 

C770 

02 

0D 

02 

0B 

0B 

02 

00 

03 


2C 

C778 

03 

03 

31 

00 

02 

02 

02 

0D 


4A 

SUM: 

42 

4B 

63 

45 

4E 

5D 

41 

4C 

5488 

C780 

0D 

0D 

02 

02 

00 

00 

02 

02 


22 

C788 

02 

00 

00 

00 

00 

00 

00 

00 


02 

C790 

00 

00 

00 

00 

00 

00 

00 

0 0 


00 

C798 

00 

00 

06 

00 

00 

06 

00 

00 


0C 

C7A0 

00 

00 

00 

06 

00 

00 

00 

00 


06 

C7A8 

00 

00 

00 

00 

00 

00 

00 

00 


00 

C7B0 

00 

00 

00 

00 

00 

00 

00 

06 


06 

C7B8 

00 

00 

00 

00 

00 

06 

00 

00 


06 

C7C0 

00 

00 

00 

09 

00 

00 

00 

00 


09 

C7C8 

00 

00 

00 

00 

00 

00 

00 

00 


00 

C7D0 

00 

0 0 

00 

00 

00 

00 

00 

0 6 


06 

C7D8 

0 0 

0 0 

00 

00 

00 

00 

06 

0 0 


06 

C7E0 

00 

00 

00 

41 

00 

31 

00 

00 


72 

C7E8 

00 

00 

21 

00 

00 

00 

00 

00 


21 

C7F0 

00 

00 

01 

01 

01 

01 

01 

01 


06 

C7F8 

01 

01 

01 

01 

01 

01 

01 

01 


08 

SUM: 

10 

0E 

2B 

54 

02 

3F 

0A 

10 

B450 

C800 

01 

11 

1 1 

11 

11 

11 

11 

11 


78 

C808 

11 

11 

11 

11 

11 

11 

11 

00 


77 

C810 

00 

00 

00 

00 

00 

00 

00 

00 


00 

C818 

00 

00 

00 

00 

00 

00 

0 0 

0E 


0E 

C820 

0E 

0 E 

0E 

0E 

0E 

0E 

0E 

0E 


70 

C828 

0E 

0 B 

0E 

0E 

0E 

00 

00 

00 


46 

C830 

00 

00 

00 

00 

00 

00 

00 

00 


00 

C838 

00 

00 

00 

00 

00 

00 

00 

00 


00 

C840 

00 

00 

00 

0 2 

02 

02 

0 2 

02 


0A 

C848 

02 

00 

00 

00 

00 

00 

00 

00 


02 

C850 

00 

02 

00 

00 

00 

00 

00 

00 


02 

C858 

02 

00 

00 

00 

01 

01 

01 

02 


07 

C860 

01 

01 

00 

00 

00 

00 

00 

00 


02 

C868 

02 

00 

10 

0 0 

00 

06 

02 

01 


IB 

C870 

00 

00 

00 

00 

00 

00 

00 

00 


00 

C878 

06 

10 

00 

00 

0 6 

01 

00 

0 0 


ID 

SUM: 

3B 

51 

4E 

40 

47 

3A 

35 

32 

37 ID 

C880 

00 

00 

00 

00 

00 

00 

00 

06 


06 

C888 

10 

00 

00 

01 

02 

00 

00 

00 


13 

C890 

21 

00 

00 

00 

00 

00 

06 

10 


37 

C898 

00 

01 

00 

02 

00 

00 

00 

00 


03 

C8A0 

00 

00 

00 

00 

00 

06 

00 

01 


07 

C8A8 

01 

01 

02 

01 

01 

00 

00 

00 


06 

C8B0 

00 

00 

00 

00 

06 

00 

00 

00 


06 

C8B8 

00 

02 

00 

00 

00 

00 

00 

00 


02 

C8C0 

00 

02 

00 

06 

00 

00 

00 

00 


08 

C8C8 

06 

02 

02 

02 

02 

02 

02 

02 


14 

C8D0 

00 

31 

06 

09 

09 

09 

09 

09 


64 

C8D8 

02 

00 

00 

00 

00 

41 

00 

00 


43 

C8E0 

00 

00 

02 

00 

00 

02 

00 

02 


06 

C8E8 

02 

02 

02 

02 

02 

02 

02 

02 


10 

C8F0 

00 

02 

00 

00 

02 

02 

02 

00 


08 

C8F8 

00 

00 

00 

00 

00 

00 

02 

00 


02 

SUM: 

3C 

3D 

0E 

17 

18 

58 

17 

26 

9552 

C900 

02 

00 

00 

00 

00 

01 

00 

00 


03 

C908 

00 

02 

02 

02 

00 

00 

00 

02 


08 

C910 

02 

00 

00 

00 

01 

00 

00 

02 


05 

C918 

00 

00 

00 

02 

00 

00 

06 

02 


0A 

C920 

00 

00 

00 

02 

02 

00 

01 

06 


0B 

C928 

00 

00 

00 

02 

00 

00 

06 

02 


0A 


C930 

02 

00 

00 

00 

00 

01 

06 

02 

0B 

C938 

0 0 

00 

02 

00 

00 

00 

06 

02 

0A 

C940 

00 

0 0 

02 

00 

00 

02 

00 

00 

04 

C948 

00 

01 

00 

00 

0 0 

00 

06 

02 

09 

C950 

00 

02 

00 

0 0 

00 

00 

00 

01 

03 

C958 

00 

00 

00 

00 

00 

00 

06 

02 

08 

C960 

02 

02 

02 

02 

02 

02 

02 

00 

0E 

C968 

00 

00 

00 

00 

00 

00 

00 

00 

00 

C970 

00 

21 

00 

00 

00 

00 

00 

00 

21 

C978 

00 

00 

00 

00 

21 

00 

00 

00 

21 

SUM: 

08 

28 

08 

0A 

26 

06 

27 

17 203C 

C980 

11 

11 

11 

00 

00 

00 

00 

00 : 

: 33 

C988 

00 

02 

02 

02 

02 

09 

00 

00 : 

11 

C990 

01 

00 

00 

OA 

02 

0 0 

00 

02 : 

: 0F 

C998 

0 0 

00 

00 

00 

02 

09 

0 0 

00 : 

: 0B 

C9A0 

00 

09 

02 

0 0 

00 

00 

03 

00 : 

: 0E 

C9A8 

00 

00 

00 

00 

02 

09 

00 

09 : 

: 14 

C9B0 

02 

00 

00 

00 

00 

03 

00 

00 : 

: 05 

C9B8 

00 

00 

00 

00 

02 

00 

02 

00 : 

: 04 

C9C0 

00 

0 0 

00 

00 

02 

02 

00 

00 : 

: 04 

C9C8 

31 

00 

00 

00 

07 

00 

0 0 

00 : 

: 38 

C9D0 

31 

00 

00 

00 

09 

02 

00 

00 : 

: 3C 

C9D8 

00 

00 

02 

00 

02 

00 

0 0 

00 : 

: 04 

C9E0 

00 

00 

09 

02 

00 

00 

0 0 

00 : 

: 0B 

C9E8 

02 

00 

00 

00 

02 

00 

00 

00 : 

: 04 

C9F0 

00 

02 

00 

00 

00 

0 0 

02 

06 : 

: 0A 

C9F8 

00 

0E 

00 

06 

02 

00 

00 

00 : 

: 16 

SUM: 

78 

2C 

20 

14 

22 

22 

07 

11 CE0E 

CA00 

02 

04 

04 

04 

04 

04 

04 

04 

IE 

CA08 

04 

04 

04 

04 

02 

00 

00 

00 

12 

CA10 

00 

00 

00 

00 

00 

00 

00 

00 

00 

CA18 

00 

00 

00 

00 

00 

00 

00 

01 

01 

CA20 

01 

01 

01 

01 

01 

01 

01 

01 

08 

CA28 

01 

00 

00 

00 

00 

00 

01 

06 

08 

CA30 

06 

06 

0 0 

06 

06 

06 

06 

06 

30 

CA38 

01 

00 

00 

00 

01 

06 

06 

06 

14 

CA40 

06 

06 

06 

06 

06 

06 

06 

06 

30 

CA48 

01 

00 

01 

06 

02 

04 

04 

04 

16 

CA50 

0 4 

04 

04 

04 

04 

04 

02 

06 

20 

CA58 

01 

00 

00 

03 

00 

00 

00 

00 

04 

CA60 

00 

00 

00 

00 

00 

03 

0 0 

00 

03 

CA68 

00 

00 

03 

00 

00 

06 

0 0 

21 

2A 

CA70 

00 

06 

00 

00 

03 

00 

00 

00 

09 

CA78 

00 

03 

00 

02 

04 

04 

04 

04 

15 

SUM: 

IB 

22 

ID 

24 

21 

2C 

22 

4D 6D22 

CA80 

04 

02 

00 

03 

00 

00 

00 

00 

09 

CA88 

03 

00 

02 

0 4 

04 

04 

04 

04 

19 

CA90 

02 

00 

03 

00 

00 

00 

00 

03 

08 

CA98 

00 

00 

00 

00 

06 

00 

00 

00 

06 

CAA0 

00 

03 

00 

00 

00 

00 

03 

00 

06 

CAA8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

CABO 

02 

00 

00 

00 

00 

02 

00 

00 

04 

CAB8 

00 

00 

31 

00 

00 

00 

00 

01 

32 

CAC0 

00 

0 0 

31 

00 

00 

00 

00 

00 

31 

CAC8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

CAD0 

31 

00 

00 

06 

00 

00 

06 

00 

3D 

CAD8 

00 

06 

00 

00 

06 

0 0 

00 

00 

0C 

CAE0 

00 

0 0 

00 

00 

00 

00 

00 

00 

00 

CAE 8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

CAF0 

06 

00 

00 

06 

00 

00 

06 

00 

12 

CAF8 

00 

06 

00 

00 

06 

00 

00 

00 

0C 

SUM: 

42 

11 

67 

13 

16 

06 

13 

08 D65F 

CB00 

00 

00 

00 

00 

21 

01 

00 

00 

22 

CB08 

00 

00 

00 

00 

00 

00 

00 

00 

00 

CB10 

00 

00 

00 

02 

02 

00 

00 

00 

04 

CB18 

00 

0 0 

00 

00 

00 

00 

06 

00 

06 

CB20 

00 

06 

00 

00 

06 

00 

0 0 

06 

12 

CB28 

00 

00 

00 

00 

00 

00 

00 

00 

00 

CB30 

00 

00 

00 

00 

00 

00 

00 

00 

00 

CB38 

00 

00 

06 

00 

00 

06 

00 

00 

0C 

CB40 

06 

00 

00 

0 6 

00 

00 

06 

00 

12 

CB48 

00 

00 

00 

00 

00 

00 

00 

00 

00 

CB50 

00 

00 

00 

00 

00 

00 

00 

00 

00 

CB58 

31 

00 

00 

00 

00 

00 

00 

00 

31 

CB60 

00 

00 

00 

0 0 

0 0 

00 

31 

0C 

3D 

CB68 

0B 

0B 

0B 

0B 

0B 

0B 

0B 

OB 

58 

CB70 

0B 

0B 

0B 

0B 

0B 

0B 

0C 

00 

4E 

CB78 

00 

02 

00 

06 

00 

66 

00 

00 

0E 

sum: 

4D 

IE 

1C 

24 

3F 

23 

54 

ID 0AB4 

CB80 

00 

00 

00 

00 

0 A 

0C 

02 

02 

1A 

CB88 

02 

02 

02 

00 

00 

00 

00 

00 

06 

CB90 

00 

00 

00 

0A 

0C 

00 

00 

02 

18 

CB98 

00 

00 

00 

00 

02 

02 

02 

02 

08 

CBA0 

0 0 

00 

0A 

0C 

00 

00 

02 

00 

18 

CBA8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

CBB0 

00 

0A 

0C 

02 

00 

02 

00 

02 

1C 

CBB8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

CBC0 

0A 

0C 

00 

00 

00 

00 

00 

00 

16 

CBC8 

00 

00 

00 

21 

00 

00 

00 

0A 

2B 

CBD0 

0C 

00 

00 

00 

00 

02 

00 

00 

0E 

CBD8 

00 

02 

02 

02 

02 

00 

0A 

0C 

IE 


CBE0 

00 

02 

02 

02 

02 

02 

00 

00 


: 0A 

CBE8 

00 

00 

00 

02 

00 

0A 

0C 

00 


: 18 

CBF0 

00 

00 

0 2 

00 

00 

00 

00 

00 


: 02 

CBF8 

00 

02 

00 

00 

0A 

00 

00 

00 


: 0C 

SUM: 

18 

IE 

IE 

3F 

26 

IE 

1C 

IE 

9 7 EE 

CC00 

02 

00 

00 

00 

00 

00 

02 

02 


06 

CC08 

00 

02 

00 

0A 

0C 

02 

04 

04 


22 

CC10 

04 

04 

04 

04 

04 

04 

04 

04 


20 

CC18 

04 

02 

0B 

00 

00 

11 

11 

11 


44 

CC20 

11 

11 

11 

11 

11 

11 

11 

1 1 


88 

CC28 

00 

00 

00 

00 

00 

41 

00 

00 


41 

CC30 

00 

00 

00 

00 

00 

00 

00 

00 


00 

CC38 

00 

00 

00 

00 

02 

0 0 

02 

00 


04 

CC40 

02 

00 

02 

41 

00 

0 0 

00 

00 


45 

CC48 

00 

00 

00 

02 

00 

0 0 

06 

00 


08 

CC50 

00 

02 

02 

02 

0 0 

00 

00 

00 


06 

CC58 

00 

00 

02 

06 

06 

02 

00 

00 


10 

CC60 

02 

00 

00 

00 

00 

00 

00 

00 


02 

CC68 

00 

02 

02 

02 

02 

02 

02 

02 


0E 

CC70 

00 

00 

00 

00 

00 

02 

02 

00 


04 

CC7 8 

24 

00 

00 

00 

00 

00 

00 

00 


24 

SUM: 

43 

ID 

28 

6C 

2B 

6F 

38 

2E 

9CB1 

CC80 

00 

00 

00 

00 

00 

00 

00 

0E 


0E 

CC88 

0E 

0E 

0E 

0E 

0E 

0E 

0E 

0E 


70 

CC90 

0E 

00 

00 

00 

02 

01 

04 

04 


19 

CC98 

04 

04 

04 

04 

04 

04 

04 

04 


20 

CCA0 

02 

06 

00 

00 

00 

00 

00 

00 


08 

CCA8 

00 

00 

00 

00 

00 

00 

00 

00 


00 

CCB0 

0A 

31 

00 

00 

00 

00 

00 

00 


3B 

CCB8 

00 

00 

00 

00 

00 

00 

00 

31 


31 

CCC0 

00 

00 

00 

01 

06 

01 

06 

01 


0F 

CCC8 

06 

01 

06 

01 

00 

00 

00 

00 


0E 

CCD0 

00 

01 

06 

01 

06 

01 

06 

01 


16 

CCD8 

06 

01 

06 

01 

00 

00 

00 

00 


0E 

CCE0 

00 

01 

06 

01 

06 

0 1 

06 

01 


16 

CCE8 

06 

01 

00 

00 

00 

00 

00 

00 


07 

CCF0 

00 

01 

06 

01 

06 

01 

06 

01 


16 

CCF8 

00 

00 

00 

00 

00 

00 

02 

00 


02 

SUM: 

3E 

4F 

30 

18 

2C 

17 

30 

59 

C3E8 

CD00 

00 

01 

06 

01 

06 

01 

00 

00 


0F 

CD08 

02 

00 

00 

0 0 

00 

00 

02 

00 


04 

CD 10 

00 

01 

06 

01 

0 0 

00 

02 

00 


0A 

CD18 

00 

00 

00 

00 

01 

00 

02 

00 


03 

CD20 

00 

01 

00 

00 

02 

00 

01 

00 


04 

CD28 

00 

00 

01 

09 

01 

00 

02 

00 


0D 

CD30 

00 

00 

02 

00 

01 

09 

01 

00 


0D 

CD38 

00 

00 

01 

09 

01 

00 

00 

02 


0D 

CD40 

00 

00 

01 

09 

01 

00 

00 

00 


0B 

CD48 

00 

09 

01 

09 

01 

00 

21 

00 


35 

CD50 

01 

09 

01 

09 

00 

00 

00 

00 


14 

CD58 

00 

02 

02 

00 

00 

00 

00 

00 


04 

CD60 

02 

07 

07 

15 

IK 

IF 

2A 

3F 


CC 

CD68 

3F 

15 

7F 

7F 

2A 

7F 

7F 

11 


8B 

CD7 0 

F3 

F3 

22 

F3 

F3 

11 

F3 

F3 


E5 

CD78 

A0 

E0 

E0 

50 

F8 

F8 

A 8 

FC 


44 

SUM: 

D7 

06 

9D 

06 

42 

B1 

6F 

41 

D488 

CD80 

FC 

74 

FE 

FE 

BA 

FE 

FE 

4D 


6F 

CD88 

CF 

CF 

8E 

CF 

CF 

4F 

CF 

CF 


B7 

CD90 

2A 

FF 

FF 

35 

3F 

FF 

2A 

3F 


04 

CD98 

FF 

35 

3F 

FF 

EA 

3F 

3F 

01 


DB 

CDA0 

DF 

C3 

04 

3F 

05 

00 

7E 

00 


68 

CDA8 

AE 

FF 

FF 

5D 

F8 

FB 

AD 

F8 


A1 

CDB0 

FB 

51) 

E8 

FB 

AF 

FC 

FC 

07 


F9 

CDB8 

BF 

87 

OA 

7E 

0A 

00 

7E 

00 


56 

CDC0 

02 

07 

07 

15 

IF 

IF 

2A 

3F 


CC 

CDC8 

3F 

15 

7F 

7F 

2A 

7F 

7F 

15 


8F 

CDD0 

FF 

FF 

2A 

FF 

FF 

31 

33 

F3 


7D 

CDD8 

A0 

E0 

E0 

50 

F8 

F8 

A8 

FC 


44 

CDE0 

FC 

74 

FE 

FE 

BA 

FE 

FE 

5D 


7F 

CDE8 

FF 

FF 

AE 

FF 

FF 

4D 

C8 

CB 


8A 

CDF0 

22 

33 

F3 

31 

33 

F3 

EA 

3F 


C8 

CDF8 

3F 

15 

FF 

FF 

2A 

FF 

FF 

01 


7B 

SUM: 

77 

D3 

FD 

26 

BE 

86 

0E 

06 

1 5FC 

CE00 

DF 

C3 

04 

3F 

05 

00 

7E 

00 


68 

CE08 

8D 

C8 

CB 

4D 

C8 

CB 

AF 

FC 


AB 

CE10 

FC 

5F 

FF 

FF 

AE 

FF 

FF 

07 


0C 

CE18 

BF 

87 

0A 

7E 

0A 

00 

7E 

00 


56 

CE20 

02 

03 

03 

05 

0F 

0F 

0A 

IF 


54 

CE28 

IF 

15 

3F 

3F 

2A 

3F 

3F 

14 


6E 

CE30 

5C 

5C 

08 

5C 

5C 

14 

5C 

5C 


44 

CE38 

A0 

F0 

F0 

54 

FC 

FC 

AA 

FE 


74 

CE40 

FE 

74 

FE 

FE 

BB 

FF 

FF 

5D 


84 

CE48 

FF 

FF 

AE 

FF 

FF 

5F 

FF 

FF 


07 

CE50 

2A 

FF 

FF 

15 

FF 

FF 

2A 

FF 


64 

CE58 

FF 

15 

FF 

FF 

28 

FD 

FC 

14 


47 

CE60 

7D 

7C 

02 

06 

06 

00 

07 

00 


0E 

CE68 

AE 

IF 

7F 

9F 

0F 

7F 

CE 

87 


CE 

CE70 

BF 

7E 

C6 

C6 

0E 

FE 

IE 

2E 


21 

CE78 

FE 

2E 

14 

FC 

14 

00 

78 

00 


C8 

SUM: 

52 

A3 

17 

75 

2E 

FF 

88 

B4 

A0D9 


. 0 mm (i6) lyjcm 


168 Oh! MZ 1987.8. 



































CE80 

02 

07 

07 

15 

IF 

IF 

2A 

3F 

CC 

D130 

FF 

FF 

15 

FF 

FF 

2A 

FF 

FF 

39 

D3E0 

3C 

FA 

FF 

FA 

10 

3F 

38 

28 : 

DE 

CE88 

3F 

15 

7F 

7F 

2A 

7F 

7F 

11 

8B 

D 1 38 

00 

78 

00 

14 

FC 

14 

2E 

FE 

C8 

D3E8 

3F 

38 

50 

FB 

F8 

A8 

FC 

FC : 

5A 

CE90 

B9 

B9 

28 

B9 

B9 

11 

B9 

B9 

8F 

D140 

2E 

0E 

FE 

IE 

7E 

C6 

C6 

CE 

30 

D3F0 

55 

FF 

FF 

AA 

FF 

FF 

54 

FE : 

4D 

CE98 

A0 

E0 

E0 

50 

F8 

F8 

A8 

FC 

44 

D148 

87 

BF 

9F 

0F 

7F 

AE 

IF 

7F 

BF 

D3F8 

FE 

2A 

7E 

7E 

55 

7F 

7F 

2B : 

A2 

CEA0 

FC 

74 

FE 

FE 

BA 

FE 

FE 

5D 

7 F 

D1 50 

14 

5C 

5C 

08 

5C 

5C 

14 

5C 

FC 











CEA8 

FF 

FF 

AE 

FF 

FF 

5F 

FF 

FF 

07 

D158 

5C 

2A 

3F 

3F 

15 

3F 

3F 

0A 

A1 

SUM: 

63 

A0 

4E 

3E 

F2 

B2 

2F 

3B 871A 

CEB0 

2A 

FF 

FF 

15 

FF 

FF 

2A 

FF 

64 

D160 

IF 

IF 

05 

0F 

0F 

02 

03 

03 

69 











CEB 8 

FF 

15 

FF 

FF 

28 

FF 

FF 

14 

4C 

D168 

5F 

FF 

FF 

AE 

FF 

FF 

5D 

FF 

65 

D400 

3F 

3F 

00 

IE 

IF 

00 

06 

07 

C8 

CEC0 

FC 

FC 

28 

7B 

78 

00 

3B 

00 

4E 

D170 

FF 

BB 

FF 

FF 

74 

FE 

FE 

AA 

D2 

D408 

54 

FE 

FE 

A8 

FF 

FC 

12 

3F 

44 

CEC8 

AE 

IF 

7F 

9F 

OF 

7F 

9E 

0F 

26 

D178 

FE 

FE 

54 

FC 

FC 

A0 

F0 

F0 

C8 

D4 10 

3A 

28 

3F 

38 

50 

FF 

F8 

E8 

08 

CED0 

7F 

9F 

0F 

7F 

EE 

9F 

9F 

0F 

E7 











D418 

FB 

F8 

20 

ID 

DC 

20 

1C 

DC 

24 

CED8 

FF 

0F 

16 

FE 

16 

00 

F8 

00 

30 

SUM: 

A2 

8D 

CF 

00 

8C 

90 

08 

81 EDAA 

D420 

0D 

0F 

OF 

2B 

3F 

3F 

57 

7F 

AA 

CEE0 

02 

07 

07 

15 

IF 

IF 

2A 

3F 

CC 











D428 

7F 

2F 

7F 

7F 

5D 

FF 

FF 

BA 

Cl 

CEE8 

3F 

15 

7F 

7F 

2A 

FF 

FF 

11 

8B 

D1 80 

00 

3B 

00 

28 

7B 

78 

14 

FC 

: 66 

D430 

FF 

FF 

55 

FF 

FF 

AA 

FF 

FF 

F9 

CEF0 

73 

73 

22 

73 

73 

11 

73 

73 

E5 

D188 

FC 

28 

FF 

FF 

15 

FF 

FF 

2A 

: 5F 

D438 

40 

E0 

E0 

FC 

FC 

FC 

FE 

FE 

F0 

CEF8 

80 

C0 

C0 

50 

F0 

F0 

A8 

F8 

D0 

D190 

FF 

FF 

15 

FF 

FF 

2 A 

FF 

FF 

: 39 

D440 

FE 

FC 

CF 

EC 

52 

8F 

EA 

94 

14 











D198 

00 

F8 

00 

16 

FE 

16 

0F 

FF 

: 30 

D448 

0F 

E4 

30 

IF 

D0 

E0 

3E 

30 

60 

SUM: 

1A 

54 

6C 

9C 

11 

3F 

E4 

4D 5D53 

D1A0 

0F 

EE 

9F 

9F 

9F 

0F 

7F 

9E 

: 06 

D450 

50 

F8 

F8 

A8 

F8 

F8 

55 

7F 

AC 











D1A8 

0F 

7F 

9F 

0F 

7F 

AE 

IF 

7F 

: 07 

D458 

7F 

2A 

7F 

7F 

15 

3F 

3F 

08 

42 

CF00 

F8 

74 

FC 

FC 

BA 

FE 

FE 

5C 

76 

D1B0 

11 

B9 

B9 

2 8 

B9 

B9 

11 

B9 

: E7 

D460 

18 

18 

00 

07 

07 

00 

00 

00 

3E 

CF08 

FE 

FE 

AE 

FF 

FF 

5F 

FF 

FF 

05 

D1B8 

B9 

2A 

7F 

7F 

15 

7F 

7F 

2A 

: IE 

D468 

50 

FD 

FO 

A2 

F3 

F2 

54 

FF 

17 

CF10 

2A 

FF 

FF 

15 

FE 

FE 

2A 

FC 

5F 

D1C0 

3F 

3F 

15 

IF 

IF 

02 

07 

07 

: El 

D470 

FE 

A8 

FC 

FC 

54 

FC 

FC 

A8 

92 

CF1 8 

FD 

17 

7C 

7C 

2A 

7F 

7F 

15 

49 

D1C8 

5F 

FF 

FF 

AE 

FF 

FF 

5D 

FF 

: 65 

D478 

FC 

FC 

0 0 

FC 

FC 

00 

F8 

F8 

E0 

CF20 

3F 

3F 

0A 

IE 

IE 

00 

1C 

00 

E0 

D1D0 

FF 

BA 

FE 

FE 

74 

FE 

FE 

A8 

: CD 











CF28 

AE 

IF 

7F 

IF 

0F 

FF 

2E 

IF 

C6 

D1D8 

FC 

FC 

50 

F8 

F8 

A0 

E0 

E0 

: 98 

SUM: 

D1 

35 

82 

93 

5A 

93 

83 

2A 9E71 

CF30 

FF 

C7 

IF 

47 

82 

BE 

82 

08 

F6 

D1E0 

00 

1C 

00 

0A 

IE 

IE 

15 

3F 

: B6 











CF38 

7C 

08 

10 

F8 

10 

00 

F0 

00 

8C 

D1E8 

3F 

2A 

7F 

7F 

17 

7C 

7C 

2A 

: A0 

D480 

05 

07 

07 

0B 

IF 

IF 

17 

3F 

B2 

CF40 

02 

07 

07 

15 

IF 

IF 

2A 

3F 

CC 

D1F0 

FC 

FD 

15 

FE 

FE 

2A 

FF 

FF 

: 32 

D488 

3F 

2F 

7F 

7 F 

5D 

7F 

7F 

BA 

81 

CF48 

3F 

15 

7F 

7F 

2A 

7F 

7F 

15 

8F 

D1F8 

00 

F0 

00 

10 

F8 

10 

08 

7C 

: 8C 

D490 

FF 

FF 

55 

FF 

FF 

AA 

FF 

FF 

F9 

CF50 

7F 

7F 

2A 

FF 

FF 

15 

FF 

FF 

39 











D498 

54 

FC 

FC 

FE 

FE 

FE 

FE 

FE 

42 

CF58 

A0 

E0 

E0 

50 

F8 

F8 

A8 

FC 

44 

SUM: 

B7 

D1 

80 

EB 

2E 

IF 

29 

96 A73A 

D4A0 

FE 

FC 

FF 

FC 

72 

8F 

FA 

88 

78 

CF60 

FC 

74 

FE 

FE 

BE 

FF 

FF 

44 

6C 











D4A8 

07 

F0 

08 

07 

F0 

F8 

0F 

08 

05 

CF68 

E6 

E6 

A6 

E6 

E6 

46 

E6 

E6 

50 

D200 

08 

82 

BE 

82 

C7 

IF 

47 

2E 

25 

D4B0 

55 

FF 

FF 

A8 

F8 

F8 

50 

F8 

33 

CF7 0 

28 

FI 

F7 

18 

F0 

F7 

2C 

F8 

33 

D208 

IF 

FF 

IF 

0F 

FF 

AE 

IF 

7F 

97 

D4B8 

F8 

2A 

7F 

7F 

55 

7F 

7F 

2A 

9D 

CF78 

FB 

07 

DC 

C4 

02 

3F 

03 

05 

EB 

D210 

11 

73 

73 

22 

73 

73 

11 

73 

83 

D4C0 

3F 

3F 

00 

18 

18 

00 

07 

07 

BC 











D218 

73 

2A 

FF 

FF 

15 

7F 

7F 

2A 

D8 

D4C8 

50 

FB 

F8 

A0 

FB 

F8 

54 

FC 

26 

SUM: 

EA 

82 

E4 

AB 

76 

BD 

C6 

09 185E 

D220 

3F 

3F 

15 

IF 

IF 

02 

07 

07 

El 

D4D0 

FC 

AA 

FF 

FE 

54 

FF 

FE 

AA 

9E 











D228 

5F 

FF 

FF 

AE 

FF 

FF 

5C 

FE 

63 

D4D8 

FF 

FE 

00 

FE 

FE 

00 

FC 

FC 

FI 

CF80 

5F 

45 

02 

0F 

02 

00 

07 

00 

BE 

D230 

FE 

BA 

FE 

FE 

74 

FC 

FC 

A8 

C8 

D4E0 

01 

03 

03 

0B 

0F 

0F 

17 

IF 

66 

CF88 

AE 

FF 

FF 

5F 

FF 

FF 

2E 

7F 

B6 

D238 

F8 

F8 

50 

F0 

F0 

80 

C0 

C0 

20 

D4E8 

IF 

2F 

3F 

3F 

5D 

7F 

7 F 

3A 

61 

CF90 

FF 

DE 

7E 

7E 

AE 

FE 

FE 

5C 

DF 

D240 

00 

07 

00 

02 

OF 

02 

05 

5F 

7E 

D4F0 

7F 

7F 

55 

FF 

FF 

AA 

FF 

FF 

F9 

CF98 

FC 

FC 

A8 

F8 

F8 

00 

B8 

00 

48 

D248 

45 

02 

3F 

03 

07 

DC 

C4 

2C 

5C 

D4F8 

50 

F0 

F0 

F8 

F8 

F8 

F0 

FC 

04 

CFA0 

02 

0 7 

07 

1 5 

1 F 

1 F 

2A 

3F 

CC 


Ffl 

FB 

18 

F0 

F7 

28 

FI 

F7 

02 











CFA8 

3F 

15 

7F 

7F 

2A 

7F 

7F 

15 

8F 

D258 

00 

B8 

00 

A8 

F8 

F8 

5C 

FC 

A8 

SUM: 

62 

C9 

DA 

A6 

F0 

6B 

45 

A5 3BF7 

CFB0 

FF 

FF 

2 A 

FF 

FF 

15 

FF 

FF 

39 

D260 

FC 

AE 

FE 

FE 

DE 

7E 

7E 

2E 

AE 











CFB8 

A0 

E0 

E0 

50 

F8 

F8 

A8 

FC 

44 

D268 

7F 

FF 

5F 

FF 

FF 

AE 

FF 

FF 

87 

D500 

F0 

E4 

FE 

E4 

42 

BF 

E2 

A0 

39 

CFC0 

FC 

74 

FE 

FE 

BE 

FE 

FE 

4D 

73 

D270 

15 

FF 

FF 

2A 

FF 

FF 

15 

7F 

CF 

D508 

0F 

E0 

10 

07 

F0 

98 

0B 

68 

01 

CFC8 

CD 

CD 

8C 

CD 

CD 

4D 

CD 

CD 

A7 

D278 

7F 

2A 

7F 

7F 

15 

7F 

7F 

2A 

E4 

D510 

55 

FF 

PF 

AA 

FF 

FF 

50 

F8 

43 

CFD0 

2A 

FI 

F7 

11 

El 

EF 

30 

El 

04 











D518 

F8 

28 

78 

78 

55 

7F 

7F 

2A 

8D 

CFD8 

EF 

11 

El 

EF 

2E 

FI 

FI 

00 

E0 

SUM: 

8B 

A0 

E3 

B0 

C6 

E4 

3C 

0B CF02 

D520 

3F 

3F 

00 

IF 

IF 

00 

08 

08 

CC 

CFE0 

EF 

E0 

01 

5F 

41 

00 

IF 

00 

8F 











D528 

54 

8C 

AC 

BA 

CE 

CE 

54 

FF 

35 

CFE8 

AE 

FF 

FF 

5F 

FF 

FF 

AE 

FF 

B6 

D280 

3F 

3F 

15 

IF 

IF 

02 

07 

07 

El 

D530 

FE 

AA 

FF 

FE 

54 

FF 

FE 

A8 

9E 

CFF0 

FF 

5F 

FF 

FF 

AE 

FF 

FF 

5F 

67 

D288 

46 

E6 

E6 

A6 

E6 

E6 

44 

E6 

AE 

D538 

FC 

FC 

00 

F8 

F8 

00 

E0 

E0 

A8 

CFF8 

FF 

FF 

2E 

FE 

3E 

00 

DC 

00 

44 

D290 

E6 

BE 

FF 

FF 

74 

FE 

FE 

A8 

BA 

D540 

00 

08 

0 8 

0B 

IF 

IF 

IF 

3F 

B7 











D298 

FC 

FC 

50 

F8 

F8 

A0 

E0 

E0 

98 

D548 

3F 

28 

78 

78 

58 

78 

78 

BA 

59 

SUM: 

65 

99 

46 

4D 

AD 

D1 

CF 

83 E9FB 

D2A0 

00 

IF 

00 

0 L 

5F 

41 

00 

EF 

AF 

D550 

FF 

FF 

55 

PF 

FF 

AA 

FF 

FF 

F9 











D2A8 

E0 

2E 

FI 

FI 

11 

El 

EF 

30 

01 

D558 

40 

B0 

E0 

F8 

F8 

F8 

FC 

FC 

E0 

D000 

02 

07 

07 

15 

IF 

IF 

2A 

3F 

CC 

D2B0 

El 

EF 

11 

El 

EF 

2A 

FI 

F7 

C3 

D560 

FC 

FE 

FF 

FE 

54 

FF 

FE 

AA 

F2 

D008 

3F 

15 

7F 

7F 

2A 

7F 

7F 

15 

8F 

D2B8 

00 

DC 

00 

2E 

FE 

3E 

5F 

FF 

A4 

D568 

FF 

FE 

54 

FE 

FE 

9A 

CF 

EE 

A4 

D010 

FF 

FF 

2 A 

FF 

FF 

15 

FF 

FF 

39 

D2C0 

FF 

AE 

FF 

FF 

5F 

FF 

FF 

AE 

B6 

D570 

55 

FF 

FF 

AA 

FF 

FF 

55 

FF 

4F 

D018 

80 

C0 

C0 

50 

F0 

F0 

A8 

F8 

D0 

D2C8 

FF 

FF 

5F 

FF 

FF 

AE 

FF 

FF 

07 

D578 

FF 

2A 

7F 

7F 

55 

7F 

7F 

2A 

A4 

D020 

F8 

74 

FC 

FC 

BC 

FC 

FC 

18 

30 

D2D0 

15 

FF 

FF 

2A 

FF 

FF 

15 

FF 

4F 











D028 

9A 

9A 

8A 

9A 

9A 

1A 

9A 

9A 

40 

D2D8 

FF 

2A 

7 F 

7F 

15 

7F 

7F 

2A 

64 

SUM: 

A6 

90 

B6 

7B 

D3 

F2 

29 

6E EE11 

D030 

28 

FI 

F7 

11 

El 

EF 

22 

C3 

D6 

D2E0 

3F 

3F 

15 

IF 

IF 

02 

07 

07 

El 











D038 

DF 

3D 

43 

43 

20 

77 

70 

01 

AA 

D2E8 

4D 

CD 

CD 

8C 

CD 

CD 

4D 

CD 

27 

D580 

3F 

3F 

00 

IF 

IF 

00 

03 

03 

C2 

D040 

6F 

61 

02 

IF 

02 

00 

IE 

00 

11 

D2F0 

CD 

BE 

FE 

FE 

74 

FE 

FE 

A8 

9F 

D588 

14 

8F 

EC 

1A 

0F 

EA 

34 

IF 

F5 

D048 

AE 

FF 

FF 

5F 

FF 

FF 

AE 

FF 

B6 

D2F8 

FC 

FC 

50 

F8 

F8 

A0 

B0 

E0 

98 

D590 

D4 

E0 

3E 

20 

40 

FC 

E0 

A0 

CE 

D050 

FF 

5F 

FF 

FF 

2E 

FF 

7F 

5E 

66 











D598 

E8 

E0 

00 

F4 

F4 

00 

F0 

F0 

90 

D058 

FE 

7E 

28 

78 

78 

00 

E0 

00 

74 

SUM: 

8F 

93 

58 

05 

98 

A8 

2C 

BC FA77 

D5A0 

05 

07 

07 

08 

18 

18 

IF 

3F 

A9 

D060 

00 

7E 

00 

04 

3F 

05 

01 

DF 

A6 











D5A8 

3F 

2F 

7F 

7F 

58 

78 

78 

B8 

6C 

D068 

C3 

EA 

3F 

3F 

35 

3F 

FF 

2A 

C8 

D300 

00 

IE 

00 

02 

IF 

02 

01 

6F 

B1 

D5B0 

F8 

F8 

55 

FF 

FI¬ 

AA 

FF 

FF 

EB 

D070 

3F 

FF 

35 

3F 

FF 

2A 

FF 

FF 

D9 

D308 

61 

20 

77 

70 

3D 

43 

43 

22 

4D 

D5B8 

54 

FC 

FC 

FE 

FE 

FE 

FE 

FF 

43 

D078 

00 

7E 

00 

0A 

7E 

0A 

07 

BF 

D6 

D310 

C3 

DF 

11 

El 

EF 

28 

FI 

F7 

93 

D5C0 

FE 

FE 

FF 

FE 

54 

FF 

FE 

AA 

F4 











D318 

00 

E0 

00 

28 

78 

78 

5E 

FE 

54 

D5C8 

FB 

FE 

54 

FF 

FC 

A8 

FF 

FC 

EE 

SUM: 

75 

39 

CC 

4E 

27 

95 

A9 

E5 7DB5 

D320 

7E 

2E 

FF 

7F 

5F 

PF 

FF 

AE 

35 

D5D0 

55 

FF 

FF 

AA 

FF 

FF 

55 

FF 

4F 











D328 

FF 

FF 

5F 

FF 

FF 

AE 

FF 

FF 

07 

D5D8 

FF 

2A 

7F 

7F 

55 

7F 

7F 

2A 

A4 

D080 

87 

AF 

FC 

FC 

5D 

F8 

FB 

AD 

2B 

D330 

15 

FF 

FF 

2A 

FF 

FF 

15 

FF 

4F 

D5E0 

3F 

3F 

00 

IF 

IF 

00 

07 

07 

CA 

D088 

F8 

FB 

5D 

FB 

FB 

AE 

FF 

FF 

EF 

D338 

FF 

2 A 

Tl- 

7F 

15 

7F 

7F 

2A 

64 

D5E8 

52 

FF 

FA 

88 

07 

FO 

08 

07 

D9 

D090 

11 

F3 

F3 

22 

F3 

F3 

11 

F3 

03 

D340 

3F 

3F 

lS 

IF 

IF 

02 

07 

07 

El 

D5F0 

F0 

88 

07 

70 

70 

8B 

88 

A8 

1A 

D098 

F3 

2A 

7F 

7F 

15 

7F 

7F 

2A 

58 

D348 

1A 

9A 

9A 

8A 

9A 

9A 

18 

9A 

BE 

D5F8 

FC 

FC 

00 

FE 

FE 

00 

FC 

FC 

EC 

D0A0 

3F 

3F 

15 

IF 

IF 

02 

07 

07 

El/ 

D350 

9A 

BC 

FC 

FC 

74 

FC 

FC 

A8 

62 











D0A8 

4 F 

CF 

CF 

8E 

CF 

CF 

4D 

CF 

35 

D358 

F8 

F8 

50 

F0 

F0 

80 

C0 

C0 

20 

SUM: 

6C 

9F 

D3 

0C 

07 

BE 

FF 

28 9149 

D0B0 

CF 

BA 

FE 

FE 

74 

FE 

FB 

A8 

9D 

D360 

05 

07 

07 

0B 

IF 

IF 

17 

3F 

B2 











D0B8 

FC 

FC 

50 

F8 

F8 

A0 

E0 

E0 

98 

D368 

3F 

2 F 

7F 

TP 

58 

78 

78 

B8 

6C 

D600 

00 

00 

00 

03 

07 

07 

18 

18 

41 

D0C0 

00 

7E 

00 

04 

3F 

05 

01 

DF 

A6 

D370 

F8 

F8 

55 

FF 

FF 

A A 

FF 

FF 

EB 

D608 

18 

2F 

3F 

3F 

5D 

7F 

7F 

38 

58 

O0C8 

C3 

2A 

FF 

FF 

15 

FF 

FF 

EA 

E8 

D378 

7C 

84 

F4 

8E 

87 

F6 

FC 

8F 

8A 

D610 

78 

78 

50 

F8 

F8 

A A 

PF 

FF 

D8 

DOD0 

3F 

3F 

31 

33 

F3 

22 

33 

F3 

ID 











D618 

50 

F8 

F8 

FC 

FC 

FC 

FC 

FC 

2C 

D0D8 

00 

7E 

00 

0A 

7E 

0A 

07 

BF 

D6 

SUM: 

58 

92 

2E 

4E 

4F 

5F 

8A 

EA E93F 

D620 

FC 

FE 

FE 

FE 

54 

FE 

FE 

AA 

F0 

D0E0 

87 

AE 

FF 

FF 

5F 

FF 

FF 

AF 

3F 











D628 

FF 

FE 

54 

PF 

FE 

A0 

FD 

F0 

DB 

D0E8 

FC 

FC 

4D 

C8 

CB 

8D 

C8 

CB 

F8 

D380 

8C 

FA 

FF 

FA 

50 

FF 

F8 

A8 

6E 

D630 

55 

FF 

FF 

AA 

FF 

FF 

55 

FF 

4F 

D0F0 

31 

33 

F3 

2A 

FF 

FF 

15 

FF 

•93 

D388 

FF 

F8 

50 

FB 

F8 

A8 

FC 

FC 

DA 

D638 

FF 

2A 

7F 

7F 

55 

7F 

7F 

2A 

A4 

D0F8 

FF 

2A 

7F 

7F 

15 

7F 

7F 

2A 

64 

D390 

55 

FF 

FF 

AA 

FF 

FF 

50 

F8 

43 

D640 

3F 

3F 

00 

IF 

IF 

00 

07 

07 

CA 











D398 

F8 

28 

78 

78 

55 

7F 

7F 

2A 

8D 

D648 

54 

FE 

F4 

22 

3F 

F2 

10 

0F 

B8 

SUM: 

91 

F7 

EB 

E8 

BD 

Cl 

51 

45 71E8 

D3A0 

3F 

3F 

00 

IF 

IF 

00 

07 

07 

CA 

D650 

E0 

90 

07 

60 

50 

8B 

A8 

B8 

12 











D3A8 

54 

FE 

FE 

A8 

FF 

FC 

52 

FF 

44 

D658 

CC 

CC 

00 

FC 

FC 

00 

E0 

E0 

50 

D100 

3F 

3F 

15 

IF 

IF 

02 

07 

07 ; 

: El 

D3B0 

FA 

A 8 

FF 

F8 

50 

FF 

F8 

F8 

D8 

D660 

3E 

21 

2F 

71 

El 

6F 

3F 

FI 

7F 

D108 

41) 

C8 

CB 

AE 

FF 

FF 

5D 

FF ; 

: E8 

D3B8 

FB 

F8 

08 

8 5 

F4 

08 

84 

F4 

F4 

D668 

31 

5F 

FF 

5F 

0A 

FF 

IF 

15 

2B 

D110 

FF 

BA 

FE 

FE 

74 

FE 

FE 

A8 : 

: CD 

D3C0 

05 

06 

07 

0A 

IE 

IF 

17 

3E 

AE 

D670 

FF 

IF 

0A 

DF 

IF 

15 

3F 

3F 

B9 

D118 

FC 

FC 

50 

F8 

F8 

A0 

E0 

E0 : 

: 98 

D3C8 

3E 

2F 

7F 

7F 

5C 

7E 

7E 

BA 

7D 

D678 

A0 

E0 

E0 

D0 

F8 

F8 

E8 

FC 

04 

D120 

00 

0 7 

00 

02 

06 

06 

14 

7D 

: A6 

D3D0 

FE 

FE 

55 

FF 

FF 

AA 

FF 

FF 

F7 











D128 

7C 

28 

FD 

FC 

15 

FF 

FF 

2A : 

: DA 

D3D8 

F4 

1C 

DC 

3E 

IF 

DE 

FC 

3F 

62 

SUM: 

7C 

DC 

6A 

78 

AA 

40 

85 

FD 7319 
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D680 

FC 

F4 

FE 

FE 

1A 

IE 

IE 

ID 


5F 

D688 

IF 

IF 

AA 

FF 

FF 

55 

FF 

FF 


39 

D690 

2A 

7 F 

7F 

15 

FF 

3F 

4 A 

FF 


C4 

D698 

5F 

15 

FF 

IF 

0A 

FF 

IF 

IF 


D9 

D6A0 

DF 

IF 

10 

A1 

2F 

10 

21 

2F 


3E 

D6A8 

AA 

FF 

FF 

55 

FF 

FF 

0A 

IF 


24 

D6D0 

IF 

14 

IE 

IE 

AA 

FE 

FE 

54 


69 

D6B8 

FC 

FC 

00 

F8 

F8 

00 

E0 

E0 


A8 

D6C0 

2F 

38 

3B 

7C 

F8 

7B 

3F 

FC 


CC 

D6C8 

3C 

5F 

FF 

5F 

08 

FC 

1C 

14 


2D 

D6D0 

FC 

1C 

0A 

DF 

IF 

15 

3F 

3F 


B3 

D6D8 

A0 

60 

E0 

50 

78 

F8 

E8 

7C 


04 

D6E0 

7C 

F4 

FE 

FE 

3A 

7E 

7E 

5D 


FF 

D6E8 

7F 

7 F 

AA 

FF 

FF 

55 

FF 

FF 


F9 

D6F0 

2A 

7F 

7F 

15 

FF 

3F 

48 

FC 


BF 

D6F8 

5C 

14 

FC 

1C 

0A 

FF 

IF 

17 


C7 

SUM: 

D0 

EE 

9A 

75 

CB 

53 

F5 

F6 

827B 

D700 

DF 

IF 

04 

B8 

3B 

04 

38 

3B 


6C 

D708 

AA 

FF 

FF 

55 

FF 

FF 

2A 

7F 


A4 

D710 

7F 

54 

7 E 

7E 

AA 

FE 

FE 

D4 


49 

D7 18 

FC 

FC 

00 

78 

F8 

00 

60 

E0 


A8 

D720 

02 

07 

07 

3F 

3F 

3F 

7F 

7F 


CB 

D728 

7F 

3F 

F3 

37 

4A 

FI 

57 

29 


A3 

D730 

F0 

27 

0C 

F8 

0B 

07 

7C 

0C 


B5 

D738 

B0 

F0 

F0 

D4 

FC 

FC 

EA 

FE 


44 

D7 40 

FE 

F4 

FE 

FE 

BA 

FF 

FF 

5D 


03 

D748 

FF 

FF 

AA 

FF 

FF 

65 

FF 

FF 


F9 

D750 

0A 

BF 

0F 

45 

CF 

4F 

2A 

FF 


64 

D758 

7 F 

15 

3F 

3F 

2A 

3F 

3F 

15 


CF 

D7 60 

3F 

3F 

00 

3F 

3F 

00 

IF 

IF 


3A 

D768 

0A 

IF 

IF 

15 

IF 

IF 

A A 

FE 


43 

D7 70 

FE 

54 

FE 

FE 

A8 

FC 

FC 

10 


FE 

D778 

18 

18 

00 

E0 

E0 

00 

00 

00 


F0 

SUM: 

0A 

5C 

8A 

F8 

04 

31 

28 

BD 

98B8 

D780 

2A 

3F 

3F 

7F 

7F 

7F 

7F 

7F 


23 

D788 

7F 

3F 

FF 

3F 

4E 

FI 

5F 

11 


AB 

D790 

E0 

0F 

10 

E0 

0F 

IF 

F0 

10 


0D 

D798 

A0 

B0 

E0 

D0 

F8 

F8 

E8 

FC 


04 

D7A0 

FC 

F4 

FE 

FE 

BA 

FE 

FE 

5D 


FF 

D7A8 

FF 

FF 

AA 

FF 

FF 

55 

FF 

FF 


F9 

D7B0 

0 A 

DF 

IF 

05 

DF 

IF 

2A 

3F 


74 

D7B8 

3F 

55 

FF 

7F 

2A 

FF 

7F 

55 


0F 

D7C0 

FF 

7F 

00 

7F 

7F 

00 

3F 

3F 


FA 

D7C8 

AA 

FF 

FF 

15 

IF 

IF 

0A 

IF 


24 

D7D0 

IF 

54 

FE 

FE 

AA 

FE 

FE 

54 


69 

D7D8 

FC 

FC 

00 

18 

18 

00 

E0 

E0 


E8 

D7E0 

0A 

0F 

0F 

IF 

IF 

IF 

0F 

3F 


D3 

D7E8 

0F 

27 

7F 

27 

42 

FD 

47 

05 


67 

D7F0 

F0 

07 

08 

E0 

0F 

19 

D0 

16 


ED 

D7F8 

80 

C0 

C0 

D0 

F0 

F0 

E8 

F8 


90 

SUM: 

BA 

5F 

47 

8F 

56 

3A 

91 

70 

E5B1 

D800 

F8 

F4 

FC 

FC 

BA 

FE 

FE 

5C 


F6 

D808 

FE 

FE 

AA 

FF 

FF 

55 

FF 

FF 


F7 

D810 

2A 

31 

35 

5D 

73 

73 

2A 

FF 


FC 

D818 

7F 

55 

FF 

7F 

2A 

FF 

7F 

15 


0F 

D820 

3F 

3F 

00 

IF 

IF 

00 

07 

07 


CA 

D828 

AA 

FF 

FF 

55 

FF 

FF 

0A 

IF 


24 

D830 

IF 

14 

IE 

IE 

AA 

FE 

FE 

54 


69 

D838 

FC 

FC 

00 

F8 

F8 

00 

10 

10 


08 

D840 

02 

07 

07 

IF 

IF 

IF 

3F 

3F 


EB 

D848 

3F 

7F 

FF 

7F 

2A 

FF 

7F 

55 


39 

D850 

FF 

7F 

2A 

7F 

7F 

59 

F3 

77 


69 

D858 

00 

10 

10 

D0 

F8 

F8 

F8 

FC 


D4 

D860 

FC 

14 

IE 

IE 

1A 

IE 

IE 

5D 


FF 

D868 

FF 

FF 

AA 

FF 

FF 

55 

FF 

FF 


F9 

D870 

28 

FI 

37 

58 

F0 

57 

2C 

F8 


13 

D878 

2B 

07 

7C 

04 

02 

3F 

07 

05 


FF 

SUM: 

31 

E6 

B2 

C7 

El 

3A 

BE 

59 

4540 

D880 

17 

07 

00 

2F 

2F 

00 

0F 

0F 


9A 

D888 

AA 

FF 

FF 

55 

FF 

FF 

AA 

FF 


A4 

D890 

FF 

54 

FE 

FE 

A A 

FE 

FE 

54 


49 

D898 

FC 

FC 

00 

F8 

F8 

00 

C0 

C0 


68 

D8A0 

2A 

3F 

3F 

7F 

7F 

7F 

7F 

FF 


A3 

D8A8 

7F 

7F 

FF 

7F 

2A 

FF 

7F 

55 


79 

D8B0 

7 F 

7F 

2A 

FF 

3F 

15 

FF 

3F 


B9 

D8B8 

A0 

E0 

E0 

10 

18 

18 

F8 

FC 


94 

D8C0 

FC 

F4 

FE 

FE 

1A 

IE 

IE 

ID 


5F 

D8C8 

IF 

IF 

AA 

FF 

FF 

55 

FF 

FF 


39 

D8D0 

4A 

FF 

5F 

11 

E0 

0F 

10 

E0 


98 

D8D8 

0F 

11 

E0 

0E 

0E 

D1 

11 

15 


13 

D8E0 

3F 

3F 

00 

7F 

7F 

00 

3F 

3F 


FA 

D8E8 

AA 

FF 

FF 

55 

FF 

FF 

AA 

FF 


A4 

D8F0 

FF 

54 

FE 

FE 

AA 

FE 

FE 

54 


49 

D8F8 

FC 

FC 

00 

F8 

F8 

00 

E0 

E0 


A8 

SUM: 

DC 

24 

29 

6D 

F7 

F8 

71 

34 

CAC4 

D900 

0A 

IF 

IF 

3F 

3F 

3F 

3F 

3F 


: 83 

D908 

3F 

7F 

7F 

7F 

2A 

7F 

7F 

55 


: 39 

D910 

FF 

7F 

2A 

FF 

7F 

05 

BF 

0F 


: F9 

D918 

00 

00 

00 

C0 

E0 

E0 

18 

18 


: B0 

D920 

18 

F4 

FC 

FC 

BA 

FE 

FE 

1C 


: D6 


170 Oh! MZ 1987.8. 


D928 
D930 
D938 
D940 
D948 
D950 
D958 
D960 
D968 
D970 
D97 8 

IE 

2A 

07 

33 

AA 

FF 

FC 

00 

00 

0C 

00 

IE 

7F 

09 

33 

FF 

54 

FC 

00 

38 

4C 

00 

0A 

2F 

E0 

00 

FF 

FE 

00 

00 

38 

78 

00 

IF 

44 

06 

3F 

55 

FE 

F8 

00 

38 

3F 

00 

IF 

FC 

0A 

3F 

FF 

AA 

F8 

00 

4C 

7F 

00 

55 
4F 
D1 
00 
FF 
FE 
00 
00 
0C 
22 
00 

FF 

08 

15 

07 

AA 

FE 

E0 

00 

4C 

09 

00 

FF 

FO 

ID 

07 

FF 

54 

E0 

00 

4C 

2B 

00 

D7 

5F 

03 

F2 

A4 

49 

A8 

00 

98 

E4 

00 

SUM: 

93 

BD 

8A 

E3 

52 

41 

93 

94 C90B 

D980 

00 

00 

00 

00 

00 

00 

00 

74 

74 

D988 

F4 

F4 

3A 

BA 

BA 

0 1 

55 

55 

41 

D990 

1A 

25 

3F 

36 

09 

2B 

46 

19 

47 

D998 

42 

42 

00 

42 

44 

00 

44 

84 

D2 

D9A0 

00 

84 

84 

00 

84 

84 

00 

84 

94 

D9A8 

58 

A7 

FF 

DC 

22 

66 

C6 

18 

40 

D9B0 

42 

42 

00 

42 

22 

00 

22 

21 

2B 

D9B8 

00 

21 

21 

00 

21 

21 

00 

21 

A5 

D9C0 

00 

00 

00 

00 

00 

00 

38 

38 

70 

D9C8 

38 

4C 

0C 

4C 

4C 

0C 

4C 

7C 

FC 

D9D0 

3C 

7C 

30 

17 

37 

02 

29 

2B 

8C 

D9D8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

D9E0 

00 

00 

00 

00 

00 

00 

00 

74 

74 

D9E8 

F4 

F4 

3A 

BA 

BA 

0 1 

55 

55 

41 

D9F0 

1A 

25 

3F 

36 

09 

2B 

46 

19 

47 

D9F8 

42 

42 

00 

42 

4 -1 

00 

44 

48 

96 

SUM: 

AE 

0C 

D2 

E5 

7A 

71 

53 

4D F6CD 

DA00 

00 

48 

48 

00 

48 

88 

00 

88 

E8 

DA08 

58 

A 7 

FF 

DC 


66 

C6 

18 

40 

DAI 0 

42 

42 

00 

42 

22 

00 

22 

12 

1C 

DA 18 

00 

12 

12 

00 

12 

14 

00 

14 

5E 

DA 20 

00 

00 

00 

38 

38 

38 

4C 

0C 

00 

DA28 

4C 

4C 

0C 

4C 

7C 

3C 

7C 

38 

5C 

DA 30 

18 

38 

10 

07 

17 

02 

29 

2B 

D4 

DA38 

00 

00 

00 

00 

00 

00 

00 

00 

00 

DA4 0 

00 

00 

00 

00 

00 

00 

00 

74 

74 

DA48 

F4 

F4 

3A 

BA 

BA 

01 

55 

55 

41 

DA50 

1A 

25 

3F 

36 

09 

2B 

46 

19 

47 

DA58 

42 

44 

00 

44 

48 

00 

48 

28 

82 

DA60 

00 

28 

28 

00 

28 

50 

00 

50 

18 

DA68 

58 

A7 

FF 

DC 

22 

66 

C6 

18 

40 

DA7 0 

42 

22 

00 

22 

12 

00 

12 

14 

BE 

DA7 8 

00 

14 

14 

0 0 

14 

0A 

00 

0A 

50 

SUM: 

E8 

29 

29 

DB 

E4 

64 

94 

C5 6CCA 

DA80 

00 

00 

00 

0 0 

00 

00 

00 

00 

00 

DA88 

00 

00 

00 

00 

00 

00 

00 

00 

00 

DA90 

00 

00 

00 

00 

00 

00 

00 

00 

00 

DA98 

00 

00 

00 

00 

00 

00 

00 

00 

00 

DAA0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

DAA8 

00 

00 

0 0 

00 

00 

00 

00 

00 

00 

DAB0 

38 

38 

38 

7C 

3C 

7C 

7C 

3C 

94 

DAB 8 

7C 

78 

17 

7F 

2A 

01 

2B 

2A 

0A 

DAC0 

15 

3F 

56 

09 

4B 

46 

19 

42 

9F 

DAC8 

00 

ae 

00 

00 

00 

00 

74 

F4 

68 

DAD0 

F4 

3A 

BA 

BA 

01 

55 

55 

58 

A5 

DAD8 

A7 

FF 

DC 

22 

66 

C6 

18 

42 

2A 

DAE0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

DAE8 

00 

00 

00 

00 

00 

00 

00 

2E 

2E 

DAF0 

2F 

2F 

5C 

5D 

5D 

80 

AA 

AA 

48 

DAF8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

SUM: 

93 

57 

97 

3D 

75 

5E 

4B 

0E D390 

DB00 

00 

1C 

1C 

1C 

02 

12 

32 

32 

FC 

DB08 

02 

32 

IE 

CE 

DE 

44 

90 

D4 

A6 

DB10 

1A 

E5 

FF 

3B 

44 

66 

63 

18 

5E 

DB18 

42 

42 

00 

42 

44 

00 

44 

84 

D2 

DB20 

00 

84 

84 

00 

84 

84 

00 

84 

94 

DB28 

58 

A4 

FC 

6C 

90 

D4 

62 

98 

C2 

DB30 

4 2 

42 

00 

42 

22 

00 

22 

21 

2B 

DB38 

00 

21 

21 

00 

21 

21 

00 

21 

A5 

DB40 

00 

00 

00 

00 

00 

00 

00 

00 

00 

DB48 

00 

00 

00 

00 

00 

00 

00 

2E 

2E 

DB50 

2F 

2F 

5C 

5D 

5D 

80 

AA 

AA 

48 

DB58 

00 

00 

00 

00 

00 

00 

1C 

1C 

38 

DB60 

1C 

32 

12 

32 

32 

12 

32 

3E 

46 

DB68 

0E 

3E 

oc 

B4 

EC 

40 

94 

D4 

D0 

DB7 0 

1A 

E5 

FF 

3B 

44 

66 

63 

18 

5E 

DB78 

42 

42 

00 

42 

44 

00 

44 

48 

96 

SUM: 

AD 

C6 

53 

05 

F2 

6D 

20 

66 8033 

DB80 

00 

48 

48 

00 

48 

28 

00 

28 

28 

DB88 

58 

A4 

FC 

6C 

9 0 

D4 

62 

98 

C2 

DB90 

42 

42 

00 

42 

22 

00 

22 

12 

1C 

DB98 

00 

12 

12 

00 

12 

11 

00 

11 

58 

DBA0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

DBA8 

00 

00 

00 

00 

00 

00 

00 

2E 

2E 

DBB0 

2F 

2F 

5C 

5D 

5D 

80 

AA 

AA 

48 

DBB8 

00 

00 

00 

1C 

1C 

1C 

32 

32 

B8 

DBC0 

32 

32 

12 

32 

3E 

0E 

3E 

1C 

4E 

DBC8 

04 

1C 

08 

E0 

E8 

40 

94 

D4 

98 
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DBD0 

1A 

E5 

FF 

3B 

44 

66 

63 

18 


: 5E 

DBD8 

42 

44 

00 

44 

48 

00 

48 

28 


: 82 

DBE0 

00 

28 

28 

00 

28 

50 

00 

50 


: 18 

DBE8 

58 

A4 

FC 

6C 

90 

D4 

62 

98 


: C2 

DBF0 

42 

22 

00 

22 

12 

00 

12 

14 


: BE 

DBF8 

00 

14 

14 

00 

14 

0A 

00 

0A 


: 50 

SUM: 

F5 

E8 

03 

46 

15 

8B 

51 

23 

FDEA 

DC00 

00 

00 

00 

00 

00 

00 

00 

00 


00 

DC08 

00 

00 

00 

00 

00 

00 

00 

00 


00 

DC 10 

00 

0 0 

00 

00 

00 

00 

00 

00 


O0 

DC18 

00 

00 

00 

00 

00 

00 

00 

00 


00 

DC20 

00 

00 

00 

00 

00 

00 

00 

00 


00 

DC28 

00 

00 

00 

01) 

00 

00 

00 

00 


00 

DC30 

00 

00 

00 

00 

00 

00 

2E 

2F 


5D 

DC38 

2F 

5C 

5D 

5D 

80 

AA 

AA 

1A 


33 

DC4 0 

E5 

FF 

3B 

44 

66 

63 

18 

4 2 


86 

DC4 8 

1C 

1C 

1C 

3E 

IE 

3E 

3E 

0E 


3A 

DC50 

3E 

IE 

E6 

FE 

54 

84 

D4 

54 


40 

DC58 

A8 

FC 

6A 

90 

D2 

62 

98 

42 


AC 

DC60 

01 

01 

01 

02 

02 

02 

04 

05 


12 

DC68 

05 

02 

02 

02 

06 

07 

07 

06 


25 

DC7 0 

06 

06 

04 

05 

05 

00 

06 

06 


26 

DC7 8 

07 

80 

87 

38 

C0 

F8 

60 

80 


DE 

SUM: 

29 

1A 

92 

AE 

F7 

32 

0B 

C0 

8512 

DC80 

C0 

C0 

20 

80 

C0 

20 

80 

0F 


8F 

DC88 

C0 

CF 

F0 

00 

F0 

60 

80 

80 


CF 

DC90 

00 

03 

03 

01 

02 

03 

0C 

0E 


26 

DC98 

0E 

IE 

IF 

IF 

12 

12 

12 

13 


B3 

DCA0 

12 

13 

0E 

00 

0E 

00 

00 

00 


41 

DCA8 

00 

E0 

C0 

F0 

00 

F0 

6F 

80 


6F 

DCB0 

6F 

80 

60 

C0 

C0 

20 

80 

40 


CF 

DCB8 

80 

C0 

38 

00 

38 

07 

00 

07 


BE 

DCC0 

0 1 

01 

01 

02 

02 

02 

04 

05 


12 

DCC8 

05 

02 

02 

02 

06 

07 

07 

06 


25 

DCD0 

06 

06 

04 

05 

05 

00 

06 

06 


26 

DCD8 

00 

80 

BO 

3E 

C0 

FE 

61 

80 


DD 

DCE0 

Cl 

C0 

20 

80 

C7 

20 

87 

08 


97 

DCE8 

C0 

C8 

F0 

00 

F0 

60 

80 

80 


C8 

DCF0 

00 

03 

03 

01 

02 

03 

1C 

IE 


46 

DCF8 

IE 

3C 

3D 

3D 

26 

26 

26 

26 


6C 

SUM: 

5A 

33 

6F 

55 

76 

5C 

C8 

D4 

5568 

DD00 

25 

27 

1C 

00 

1C 

00 

00 

00 


84 

DD08 

00 

E0 

C0 

F0 

00 

F0 

68 

80 


68 

DD10 

88 

87 

60 

C7 

C0 

20 

80 

40 


D6 

DD18 

80 

C0 

3E 

00 

3E 

01 

00 

01 


BE 

DD20 

01 

01 

01 

02 

02 

02 

04 

05 


12 

DD28 

0 5 

02 

02 

02 

06 

07 

07 

06 


25 

DD30 

06 

06 

04 

05 

05 

00 

06 

06 


26 

DD38 

00 

80 

80 

39 

C0 

F9 

66 

80 


D8 

DD40 

C6 

Cl 

20 

81 

CE 

20 

8E 

10 


B4 

DD48 

C0 

D0 

E0 

00 

E0 

60 

80 

80 


B0 

DD50 

00 

03 

03 

01 

02 

03 

38 

3A 


7E 

DD58 

3A 

7C 

7 D 

7D 

•IE 

4C 

4E 

4C 


E4 

DD60 

49 

4D 

38 

00 

38 

00 

00 

00 


06 

DD68 

00 

E0 

C0 

E0 

00 

E0 

70 

80 


50 

DD7 0 

90 

8E 

60 

CE 

Cl 

20 

81 

46 


F4 

DD78 

80 

C6 

39 

00 

39 

00 

00 

00 


B8 

SUM: 

52 

68 

12 

A6 

17 

E2 

E4 

2E 

DCB0 

DD80 

00 

00 

00 

00 

00 

00 

00 

00 


00 

DD88 

00 

00 

00 

00 

00 

00 

00 

00 


00 

DD90 

00 

00 

00 

00 

00 

00 

00 

00 


00 

DD98 

08 

0C 

0C 

11 

16 

17 

23 

2C 


AD 

DDA0 

2E 

16 

11 

14 

36 

39 

3C 

30 


44 

DDA8 

36 

36 

27 

2 8 

2F 

03 

34 

34 


55 

DDB0 

00 

00 

00 

00 

00 

00 

00 

00 


00 

DDB8 

00 

00 

00 

00 

00 

00 

00 

00 


00 

DDC0 

00 

00 

00 

00 

00 

00 

00 

00 


00 

DDC8 

00 

IF 

IE 

0F 

10 

IF 

63 

74 


52 

DDD0 

74 

FC 

E3 

FE 

F2 

F5 

F4 

FC 


28 

DDD8 

E0 

FC 

73 

00 

73 

00 

00 

00 


C2 

DDE0 

00 

00 

00 

0E 

0E 

0E 

13 

12 


4F 

DDE8 

13 

12 

12 

12 

IE 

19 

IF 

0C 


AB 

DDF0 

00 

0C 

01 

02 

03 

00 

03 

03 


18 

DDF8 

07 

00 

07 

38 

00 

38 

40 

80 


3E 

SUM: 

DA 

8D 

D2 

B4 

IF 

C6 

5F 

A1 

E1CD 

DE00 

C0 

C0 

20 

80 

80 

60 

C0 

6F 


2F 

DE08 

80 

8F 

F0 

00 

F0 

00 

E0 

C0 


8F 

DE10 

00 

06 

06 

04 

05 

05 

06 

06 


26 

DEI 8 

06 

06 

07 

07 

02 

02 

02 

04 


24 

DE20 

05 

05 

02 

02 

02 

01 

01 

01 


13 

DE28 

60 

80 

80 

F0 

00 

F0 

0F 

C0 


0F 

DE30 

CF 

C0 

20 

80 

C0 

20 

80 

60 


EF 

DE38 

80 

C0 

38 

C0 

F8 

07 

80 

87 


3E 

DE40 

00 

00 

00 

1C 

1C 

1C 

26 

27 


A1 

DE48 

27 

26 

24 

26 

3C 

39 

3D 

1C 


65 

DE50 

02 

IE 

01 

02 

03 

00 

03 

03 


2C 

DE58 

01 

00 

01 

3E 

00 

3E 

40 

80 


3E 

DB60 

C0 

C0 

20 

80 

87 

60 

C7 

68 


36 

DE68 

80 

88 

F0 

00 

F0 

00 

E0 

C0 


88 

DE70 

00 

06 

06 

04 

05 

05 

06 

06 


26 

— y 7 h i)' 

A IliJC 



iM 

6 ti' 





xtft mb os) 

































DE78 

06 

06 

07 

07 

02 

02 

02 

04 

: 24 

SUM: 

6A 

F8 

3A 

CA 

0A 

79 

0D 

D9 F1CE 

DE80 

05 

05 

02 

02 

02 

01 

01 

01 

13 

DE88 

60 

80 

80 

F0 

00 

F0 

08 

C0 

08 

DE90 

C8 

C7 

20 

87 

C0 

20 

80 

61 

F7 

DE98 

80 

Cl 

3E 

C0 

FE 

00 

80 

80 

3D 

DEA0 

00 

00 

00 

38 

38 

38 

4C 

4D 

41 

DEA8 

4D 

4E 

48 

4E 

7C 

71 

7D 

38 

D3 

DEB0 

22 

3A 

01 

02 

03 

00 

03 

03 

68 

DEB8 

00 

00 

00 

39 

00 

39 

46 

80 

38 

DEC0 

C6 

Cl 

20 

81 

8E 

60 

CE 

70 

54 

DEC8 

80 

90 

E0 

00 

E0 

00 

E0 

C0 

70 

DED0 

00 

06 

06 

04 

05 

05 

06 

06 

26 

DED8 

06 

06 

07 

07 

02 

02 

02 

04 

24 

DEE0 

05 

05 

02 

02 

02 

01 

01 

01 

13 

DEE8 

60 

80 

80 

E0 

00 

E0 

10 

C0 

F0 

DEF0 

D0 

CE 

20 

8E 

Cl 

20 

81 

66 

14 

DEF8 

80 

C6 

39 

C0 

F9 

00 

80 

80 

38 

SUM: 

ID 

0B 

11 

B6 

A8 

5B 

E3 

8B 05A1 

DF00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

DF08 

00 

00 

00 

00 

00 

00 

00 

00 

00 

DF10 

00 

00 

00 

00 

00 

00 

00 

00 

00 

DF18 

00 

00 

00 

73 

70 

73 

FC 

F8 

4 A 

DF20 

FC 

F2 

E5 

F4 

FC 

C3 

FE 

63 

E7 

DF28 

14 

74 

0F 

10 

IF 

00 

IF 

IE 

03 

DF30 

00 

00 

00 

00 

00 

00 

00 

00 

00 

DF38 

00 

00 

00 

00 

00 

00 

00 

00 

00 

DF40 

00 

00 

00 

00 

00 

00 

00 

00 

00 

DF4 8 

03 

34 

34 

27 

28 

2F 

30 

36 

4F 

DF50 

36 

36 

39 

3C 

16 

11 

14 

23 

3F 

DF58 

2C 

2E 

11 

16 

17 

08 

0C 

0C 

B8 

DF60 

84 

00 

84 

84 

00 

84 

84 

00 

94 

DF68 

84 

44 

00 

44 

42 

00 

42 

46 

D6 

DF70 

19 

42 

36 

09 

2B 

1A 

25 

3F 

43 

DF78 

21 

00 

21 

21 

00 

21 

21 

00 

A5 

SUM: 

B7 

84 

4D 

E2 

4D 

3D 

75 

63 117A 

DF80 

21 

22 

00 

22 

42 

00 

42 

C6 

AF 

DF88 

18 

42 

DC 

22 

66 

58 

A7 

FF 

BC 

DF90 

22 

09 

2B 

78 

3F 

7F 

4C 

0C 

E4 

DF98 

4C 

4C 

0C 

4C 

38 

38 

38 

00 

98 

DFA0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

DFA8 

01 

55 

55 

3 A 

BA 

BA 

74 

F4 

Cl 

DFB0 

F4 

00 

00 

00 

00 

00 

00 

00 

F4 

DFB8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

DFC0 

88 

00 

88 

48 

00 

48 

48 

00 

E8 

DFC8 

48 

44 

00 

44 

42 

00 

42 

46 

9A 

DFD0 

19 

42 

36 

09 

2B 

1A 

25 

3F 

43 

DFD8 

14 

00 

14 

12 

00 

12 

12 

00 

5E 

DFE0 

12 

22 

00 

22 

42 

00 

42 

C6 

A0 

DFE8 

18 

42 

DC 

22 

66 

58 

A7 

FF 

BC 

DFF0 

02 

29 

2B 

30 

17 

37 

7C 

3C 

8C 

DFF8 

7C 

4C 

0C 

4C 

4C 

0C 

4C 

38 

FC 

SUM: 

41 

6D 

4D 

A9 

51 

D8 

53 

83 A997 

E000 

38 

38 

00 

00 

00 

00 

00 

00 

70 

E008 

01 

55 

55 

3A 

BA 

BA 

74 

F4 

Cl 

E010 

F4 

00 

00 

00 

00 

00 

00 

00 

F4 

E018 

00 

00 

00 

00 

00 

00 

00 

00 

00 

E020 

50 

00 

50 

28 

00 

28 

28 

00 

18 

E028 

28 

48 

00 

48 

44 

00 

44 

46 

86 

E030 

19 

42 

36 

09 

2B 

1A 

25 

3F 

43 

E038 

0A 

00 

0A 

14 

00 

14 

14 

00 

50 

E040 

14 

12 

00 

12 

22 

00 

22 

C6 

42 

E048 

18 

42 

DC 

22 

66 

58 

A7 

FF 

BC 

E050 

02 

29 

2B 

10 

07 

17 

38 

18 

D4 

E058 

38 

7C 

3C 

7C 

4C 

0C 

4C 

4C 

5C 

E060 

0C 

4C 

38 

38 

38 

00 

00 

00 

00 

E068 

01 

55 

55 

3A 

BA 

BA 

74 

F4 

Cl 

E070 

F4 

00 

00 

00 

00 

00 

00 

00 

F4 

E078 

00 

00 

00 

00 

00 

00 

00 

00 

00 

SUM: 

to 1 
»*J i 

B1 

B5 

F9 

F6 

45 

DA 

96 E01F 

E080 

46 

19 

42 

56 

09 

4fi 

2A 

15 

8A 

E088 

3F 

2A 

01 

2B 

78 

17 

7F 

7C 

IF 

E090 

3C 

7C 

7C 

3C 

7 C 

38 

38 

38 

94 

E098 

C6 

18 

42 

DC 

22 

66 

58 

A7 

83 

E0A0 

FF 

01 

55 

55 

3A 

BA 

BA 

74 

CC 

E0A8 

F4 

F4 

00 

00 

00 

00 

00 

00 

B8 

E0B0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

E0B8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

E0C0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

E0C8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

E0D0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

E0D8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

E0E0 

84 

00 

84 

84 

00 

84 

8 4 

00 

94 

E0E8 

84 

44 

00 

44 

42 

00 

42 

63 

F3 

E0F0 

18 

42 

3B 

44 

66 

1A 

E5 

FF 

3D 

E0F8 

21 

00 

21 

21 

00 

21 

21 

00 

A5 

SUM; 

BB 

52 

36 

IB 

01 

79 

BF 

46 8381 

E100 

21 

22 

00 

22 

42 

00 

4 2 

62 : 

: 4B 

E108 

98 

42 

6C 

90 

D4 

58 

A4 

FC ; 

: A2 


El 10 

80 

A A 

AA 

5C 

5D 

5D 

2E 

2F 

47 

E 118 

2F 

00 

00 

00 

00 

00 

00 

00 

2F 

E1 20 

00 

00 

00 

00 

00 

00 

00 

00 

00 

El 28 

44 

90 

D4 

IE 

CE 

DE 

32 

02 

A6 

E 1 30 

32 

32 

12 

32 

1C 

1C 

1C 

00 

FC 

E1 38 

00 

00 

00 

00 

00 

00 

00 

00 

00 

E140 

28 

00 

28 

48 

00 

48 

48 

00 

28 

El 48 

48 

44 

00 

44 

42 

00 

42 

63 

B7 

E1 50 

18 

42 

3B 

44 

66 

1A 

E5 

FF 

3D 

El 58 

11 

00 

1 1 

12 

00 

12 

12 

00 

58 

E160 

12 

22 

00 

22 

42 

00 

42 

62 

3C 

E168 

98 

42 

6C 

90 

D4 

58 

A4 

FC 

A2 

E1 70 

80 

AA 

AA 

5C 

5D 

5D 

2E 

2F 

47 

E1 78 

2F 

00 

00 

00 

00 

00 

00 

00 

2F 

SUM: 

D0 

64 

86 

4E 

78 

D8 

F7 

7E 1DFA 

E 180 

00 

00 

00 

00 

00 

00 

00 

00 

00 

El 88 

40 

94 

D4 

0C 

E4 

EC 

3E 

0E 

D0 

E1 90 

3E 

32 

12 

32 

32 

12 

32 

1C 

4 6 

E1 98 

1C 

1C 

00 

00 

00 

00 

00 

00 

38 

E1A0 

50 

00 

50 

28 

00 

28 

28 

00 

18 

E1A8 

28 

48 

00 

48 

44 

00 

44 

63 

A3 

E1B0 

18 

42 

3 B 

44 

66 

1A 

B 5 

FF 

3D 

E1B8 

0A 

00 

0A 

14 

00 

14 

14 

00 

50 

E1C0 

14 

12 

00 

12 

22 

00 

22 

62 

DE 

E1C8 

98 

42 

6C 

90 

D4 

58 

A4 

FC 

A2 

E1D0 

80 

AA 

AA 

5C 

5D 

5D 

2E 

2F 

47 

E1D8 

2F 

00 

00 

00 

00 

00 

00 

00 

2F 

E1E0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

E1E8 

•1 0 

9 4 

D4 

08 

E0 

E8 

1C 

04 

98 

E1F0 

1C 

3E 

0E 

3E 

32 

12 

32 

32 

4E 

E1F8 

32 

32 

1C 

1C 

1C 

00 

00 

00 

B8 

SUM: 

ID 

6E 

8F 

66 

41 

03 

17 

4F E8E6 

E200 

63 

18 

42 

3B 

44 

66 

1A 

E5 

A1 

E208 

FF 

80 

AA 

AA 

5C 

5D 

5D 

2E 

17 

E210 

2F 

2F 

00 

00 

00 

00 

00 

00 

5E 

E218 

62 

98 

42 

6A 

90 

D2 

54 

A8 

04 

E220 

FC 

54 

84 

D4 

IE 

E6 

FE 

3E 

E8 

E228 

0E 

3E 

3E 

IE 

3E 

1C 

1C 

1C 

3A 

E230 

00 

00 

00 

00 

00 

00 

00 

00 

00 

E238 

00 

00 

00 

00 

00 

00 

00 

00 

00 

E240 

00 

00 

00 

00 

00 

00 

0 0 

00 

00 

E248 

00 

00 

00 

00 

00 

00 

00 

00 

00 

E250 

00 

00 

00 

00 

00 

00 

00 

00 

00 

E258 

00 

00 

00 

00 

00 

00 

00 

00 

00 

E260 

E0 

00 

E0 

1C 

00 

1C 

02 

01 

FB 

E268 

03 

03 

04 

01 

01 

06 

03 

F6 

0B 

E270 

01 

FI 

0F 

00 

0F 

00 

07 

03 

1A 

E278 

00 

00 

00 

70 

70 

70 

C8 

48 

60 

SUM: 

El 

E5 

E3 

CE 

0C 

29 

B9 

57 4D9B 

E280 

C8 

48 

48 

48 

78 

98 

F8 

30 

D8 

E288 

00 

30 

80 

40 

C0 

00 

C0 

C0 

30 

E290 

06 

01 

01 

0F 

00 

0F 

F0 

03 

19 

E298 

F3 

03 

04 

01 

03 

04 

01 

06 

09 

E2A0 

01 

03 

1C 

03 

IF 

E0 

01 

El 

04 

E2A8 

00 

60 

60 

20 

A0 

A0 

60 

60 

E0 

E2B0 

60 

60 

E0 

E0 

40 

40 

40 

20 

60 

E2B8 

A0 

A0 

40 

40 

40 

80 

80 

80 

80 

B2C0 

80 

00 

80 

7C 

00 

7C 

02 

01 

FB 

E2C8 

03 

03 

04 

01 

El 

06 

E3 

16 

EB 

E2D0 

01 

11 

0F 

00 

0F 

00 

07 

03 

3A 

E2D8 

00 

00 

00 

38 

38 

38 

64 

E4 

F0 

E2E0 

E4 

64 

24 

64 

3C 

9C 

BC 

38 

9C 

E2E8 

40 

78 

80 

40 

C0 

00 

C0 

C0 

B8 

E2F0 

06 

01 

01 

0F 

00 

0F 

10 

03 

39 

E2F8 

13 

E3 

04 

El 

03 

04 

0 1 

86 

69 

SUM: 

83 

B3 

A5 

24 

A1 

54 

A7 

59 8669 

E300 

01 

83 

7C 

03 

7F 

00 

01 

01 

84 

E308 

00 

60 

60 

20 

A0 

A0 

60 

60 

E0 

E310 

60 

60 

E0 

E0 

40 

40 

40 

20 

60 

E318 

A0 

A0 

40 

40 

40 

80 

80 

80 

80 

E320 

00 

00 

00 

9C 

00 

9C 

62 

01 

9B 

E328 

63 

83 

04 

81 

71 

06 

73 

0E 

63 

E330 

01 

09 

07 

00 

07 

00 

07 

03 

22 

E338 

00 

00 

00 

1C 

1C 

1C 

32 

B2 

38 

E340 

B2 

72 

12 

72 

3E 

8E 

BE 

1C 

4E 

E348 

44 

5C 

80 

40 

C0 

00 

C0 

C0 

A0 

E350 

06 

01 

01 

07 

00 

07 

08 

03 

21 

E358 

0B 

73 

04 

71 

83 

04 

81 

66 

61 

E360 

01 

63 

9C 

03 

9F 

00 

01 

01 

A4 

E368 

00 

60 

60 

20 

A0 

A0 

60 

60 

E0 

E370 

60 

60 

E0 

E0 

40 

40 

40 

20 

60 

E378 

A0 

A0 

40 

40 

40 

80 

80 

80 

80 

SUM: 

6D 

74 

BA 

E9 

73 

17 

57 

‘ 0B 4 ICE 

E380 

10 

30 

30 

88 

68 

E8 

C4 

34 

40 

E388 

74 

68 

88 

28 

6C 

9C 

3C 

0C 

DC 

E390 

6C 

6C 

E4 

14 

F4 

C0 

2C 

2C 

DC 

E398 

00 

00 

00 

00 

00 

00 

00 

00 

00 

E3A0 

00 

0 0 

00 

00 

00 

00 

00 

00 

00 

E3A8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

E3B0 

00 

F8 

78 

F0 

08 

F8 

C6 

2E 

54 


E3B8 

2E 

3F 

C7 

7 F 

4F 

AF 

2F 

3F 


IF 

E3C0 

07 

3F 

CE 

0 0 

CE 

00 

00 

00 


E2 

E3C8 

00 

00 

00 

0 0 

00 

0 0 

00 

00 


00 

E3D0 

00 

00 

00 

00 

00 

00 

00 

00 


00 

E3D8 

00 

00 

00 

00 

0 0 

00 

00 

0 0 


00 

E3E0 

E0 

01 

El 

1C 

03 

IF 

06 

01 


07 

E3E8 

03 

03 

04 

01 

03 

04 

01 

F0 


03 

E3F0 

03 

F3 

0F 

00 

OK 

06 

01 

01 


1C 

E3F8 

80 

80 

80 

■1 0 

40 

40 

20 

A0 


00 

SUM: 

8B 

FI 

ID 

90 

42 

54 

49 

6B 

86A4 

E400 

A0 

40 

40 

40 

60 

E0 

E0 

60 


E0 

E408 

60 

60 

20 

A0 

A0 

00 

60 

60 


E0 

E410 

00 

07 

03 

0F 

00 

0F 

F6 

01 


IF 

E4 18 

FI 

01 

06 

03 

03 

04 

01 

02 


05 

E420 

01 

03 

1C 

00 

1C 

E0 

00 

E0 


FC 

E428 

00 

C0 

C0 

80 

4 0 

C0 

30 

70 


A0 

E430 

70 

78 

F8 

F8 

48 

48 

4 8 

C8 


78 

E438 

48 

C8 

70 

00 

70 

00 

00 

00 


F0 

E440 

00 

01 

01 

7C 

03 

7F 

86 

01 


87 

E448 

83 

03 

04 

01 

E3 

04 

El 

10 


63 

E450 

03 

13 

0F 

00 

0F 

06 

01 

01 


3C 

E458 

80 

80 

80 

40 

40 

40 

20 

A0 


00 

E460 

A0 

40 

40 

•1 0 

60 

E0 

E0 

60 


E0 

E468 

60 

60 

20 

A0 

A0 

00 

60 

60 


E0 

E470 

00 

07 

03 

0F 

00 

0F 

16 

01 


3F 

E478 

11 

El 

06 

E3 

03 

04 

01 

02 


E5 

SUM: 

Cl 

CA 

AA 

F9 

4F 

97 

8E 

50 

A94A 

E480 

01 

03 

7C 

00 

7C 

80 

00 

80 


FC 

E488 

00 

C0 

C0 

80 

40 

C0 

38 

78 


B0 

E490 

78 

3C 

BC 

BC 

64 

64 

64 

64 


BC 

E498 

A4 

E4 

38 

00 

38 

00 

0 0 

0 0 


F8 

E4A0 

00 

01 

01 

9C 

03 

9F 

66 

01 


A7 

E4A8 

63 

83 

04 

81 

73 

04 

71 

08 


5B 

E4B0 

03 

0B 

07 

00 

07 

06 

01 

01 


24 

E4B8 

80 

80 

80 

40 

40 

40 

20 

A0 


00 

E4C0 

A0 

40 

40 

40 

60 

E0 

E0 

60 


E0 

E4C8 

60 

60 

20 

A0 

A0 

00 

60 

60 


E0 

E4D0 

00 

07 

03 

07 

00 

07 

0E 

0 1 


27 

E4D8 

09 

71 

06 

73 

83 

04 

81 

62 


5D 

E4E0 

0 1 

63 

9C 

00 

9C 

00 

00 

00 


9C 

E4E8 

00 

C0 

C0 

80 

40 

C0 

1C 

5C 


78 

E4F0 

5C 

3E 

BE 

BE 

72 

32 

72 

32 


5E 

E4F8 

92 

B2 

1C 

00 

1C 

00 

00 

00 


7C 

SUM: 

FB 

ID 

5B 

31 

02 

6A 

FI 

B7 

9EEC 

E500 

10 

30 

30 

88 

68 

E8 

C4 

34 


40 

E508 

74 

68 

88 

28 

6C 

9C 

3C 

0C 


DC 

E510 

6C 

6C 

E4 

14 

F4 

C0 

2C 

2C 


DC 

E518 

00 

00 

00 

00 

00 

00 

00 

00 


00 

E520 

00 

00 

00 

00 

0 0 

00 

00 

00 


00 

E528 

00 

00 

00 

00 

00 

00 

60 

00 


00 

E530 

00 

F8 

78 

F0 

08 

F8 

06 

2E 


54 

E538 

2E 

3F 

C7 

7F 

4F 

AF 

2F 

3F 


IF 

E540 

0 7 

3F 

CE 

00 

CE 

00 

00 

00 


E2 

E548 

00 

00 

00 

00 

00 

00 

00 

00 


00 

E550 

00 

00 

00 

00 

00 

00 

00 

0 0 


00 

E558 

00 

00 

00 

00 

00 

00 

00 

00 


00 

E560 

00 

00 

00 

00 

00 

00 

00 

00 


00 

E568 

00 

0E 

00 

00 

26 

00 

06 

59 


93 

E570 

06 

IF 

36 

0F 

3F 

AF 

IF 

3 F 


B6 

E578 

00 

00 

00 

00 

00 

00 

6F 

00 


6F 

SUM: 

2B 

A7 

DF 

42 

52 

9A 

B5 

71 

DC9E 

E580 

00 

C7 

00 

00 

52 

00 

52 

BF 


2A 

E588 

00 

A4 

F5 

00 

FI 

57 

80 

D6 


37 

E590 

AF 

IF 

3 K 

76 

0F 

3F 

19 

06 


F0 

E598 

IF 

26 

00 

06 

1C 

00 

00 

00 


67 

E5A0 

00 

00 

00 

00 

00 

00 

00 

00 


00 

E5A8 

73 

80 

F0 

EF 

00 

ED 

AA 

00 


69 

E5B0 

AA 

FF 

00 

D1 

F9 

00 

00 

4D 


C0 

E5B8 

00 

00 

00 

00 

00 

00 

00 

00 


00 

E5C0 

37 

00 

02 

3D 

0 0 

0 9 

37 

00 


B6 

E5C8 

05 

24 

00 

00 

0F 

00 

0B 

26 


69 

E5D0 

00 

06 

3 B 

00 

0B 

16 

01 

07 


6A 

E5D8 

DC 

00 

50 

F0 

00 

20 

54 

00 


90 

E5E0 

40 

7C 

00 

60 

98 

00 

90 

FH 


3C 

E5E8 

00 

E0 

DC 

00 

D0 

78 

80 

F0 


74 

E5F0 

05 

03 

07 

IB 

07 

0F 

IB 

0 7 


62 

E5F8 

OF 

15 

03 

07 

06 

01 

07 

0B 


47 

SUM: 

57 

CD 

97 

EB 

F6 

4A 

5E 

0F 

A7CE 

E600 

00 

03 

04 

00 

00 

01 

00 

00 


08 

E608 

A0 

C0 

E0 

D0 

E0 

F0 

D8 

E0 


98 

E610 

F0 

A8 

C0 

E0 

68 

80 

E0 

D0 


D0 

E618 

0 0 

C0 

40 

00 

00 

80 

00 

00 


80 

E620 

00 

00 

00 

00 

00 

00 

B2 

00 


B2 

E628 

00 

9F 

00 

00 

FF 

00 

8B 

55 


7E 

E630 

00 

55 

F7 

00 

B7 

CE 

0 1 

0F 


El 

E638 

00 

00 

00 

00 

00 

00 

00 

00 


00 

E640 

00 

38 

00 

00 

64 

00 

60 

98 


94 

E648 

60 

F8 

6E 

F0 

FC 

F5 

F8 

FC 


9B 

E650 

EA 

01 

6B 

AF 

00 

8F 

FD 

00 


91 

E658 

25 

4A 

00 

4A 

E3 

00 

00 

F6 


92 
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E660 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

E668 

F5 

F8 

FC 

6C 

F0 

FC 

9A 

60 ; 

: 3B 

E670 

F8 

64 

00 

60 

70 

00 

00 

00 

: 2C 

E678 

00 

00 

00 

00 

00 

00 

0 0 

00 ; 

: 00 

SUM: 

EC 

F6 

B0 

65 

A1 

3F 

E5 

FE D9A7 

E680 

01 

00 

00 

02 

00 

00 

0B 

00 

0E 

E688 

03 

16 

01 

07 

15 

03 

07 

IB 

5B 

E690 

07 

0F 

0B 

07 

0F 

05 

0 8 

07 

46 

E698 

80 

00 

00 

20 

00 

00 

D0 

00 

70 

E6A0 

C0 

60 

8 0 

E0 

A8 

C0 

E0 

D8 

A0 

E6A8 

E0 

F0 

D8 

E0 

F0 

A0 

C0 

E0 

B8 

E6B0 

IE 

01 

0F 

3B 

00 

0B 

IF 

00 

93 

E6B8 

07 

19 

00 

09 

3E 

00 

06 

2A 

97 

E6C0 

00 

02 

0F 

00 

04 

3B 

00 

0A 

5A 

E6C8 

68 

80 

E0 

DC 

00 

D0 

64 

00 

D8 

E6D0 

60 

F0 

00 

DO 

24 

00 

00 

EC 

30 

E6D8 

00 

AO 

BC 

0 0 

90 

EC 

00 

40 

18 

E6E0 

00 

00 

00 

00 

00 

00 

01 

00 

01 

E6E8 

00 

0E 

00 

00 

26 

00 

06 

59 

93 

E6F0 

Go 

IF 

B6 

0F 

3F 

2 F 

IF 

3F 

B6 

E6F8 

00 

00 

00 

00 

00 

00 

75 

00 

75 

SUM: 

IE 

CE 

D4 

EF 

17 

99 

A9 

D2 900F 

E700 

00 

C7 

00 

0 0 

5A 

00 

5A 

BF 

3A 

E708 

00 

A4 

DO 

00 

D9 

5F 

80 

DE 

17 

E710 

AF 

IF 

3F 

36 

0F 

3F 

39 

06 

D0 

E718 

IF 

26 

00 

06 

1C 

0 0 

00 

01 

68 

E720 

00 

00 

00 

00 

00 

00 

00 

00 

00 

E7 28 

6B 

80 

E8 

F7 

00 

F6 

AB 

00 

6B 

E730 

A9 

FF 

00 

D 1 

F9 

00 

00 

27 

99 

E738 

00 

00 

00 

00 

00 

00 

00 

00 

00 

E740 

37 

00 

02 

ID 

00 

09 

37 

00 

96 

E748 

05 

0F 

00 

0B 

2F 

00 

0B 

24 

7D 

E750 

00 

04 

3B 

00 

0B 

16 

01 

07 

68 

E758 

FC 

00 

30 

F4 

00 

40 

54 

00 

B4 

E760 

40 

B8 

00 

A0 

58 

00 

50 

FC 

3C 

E768 

00 

E0 

D8 

00 

D0 

78 

80 

F0 

70 

E770 

25 

03 

07 

IB 

07 

0F 

IB 

07 

82 

E778 

0F 

15 

03 

07 

06 

01 

07 

0B 

47 

SUM: 

8E 

F2 

53 

E2 

C6 

7B 

47 

F4 3908 

E780 

00 

03 

04 

00 

00 

02 

00 

00 

09 

E788 

A4 

CO 

E0 

D0 

E0 

F0 

D8 

E0 

9C 

E790 

F0 

A8 

C0 

E0 

68 

80 

E0 

F0 

F0 

E798 

00 

C0 

00 

00 

00 

80 

00 

00 

40 

E7A0 

00 

00 

00 

00 

00 

00 

E4 

00 

E4 

E7A8 

00 

9F 

00 

00 

FF 

00 

8B 

D5 

FE 

E7B0 

00 

95 

EF 

00 

6F 

D6 

01 

17 

El 

E7B8 

00 

00 

00 

00 

00 

00 

80 

00 

80 

E7C0 

00 

38 

00 

00 

64 

00 

60 

9C 

98 

E7C8 

60 

F8 

ec 

F0 

FC 

F5 

F8 

FC 

99 

E7D0 

FA 

01 

7B 

BB 

00 

9B 

FD 

00 

C9 

E7D8 

25 

5A 

00 

5A 

E3 

00 

00 

AE 

6A 

E7E0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

E7E8 

F4 

F8 

FC 

6D 

F0 

FC 

9A 

60 

3B 

E7F0 

F8 

64 

00 

60 

70 

00 

00 

80 

AC 

E7F8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

SUM: 

FF 

46 

76 

82 

59 

54 

97 

E2 6CEA 

E800 

01 

00 

00 

00 

00 

0 0 

0F 

00 

10 

E808 

03 

16 

01 

07 

15 

03 

07 

IB 

5B 

E810 

07 

0F 

0B 

07 

0F 

25 

03 

07 

66 

E818 

40 

00 

00 

20 

00 

00 

DO 

00 

30 

E820 

C0 

60 

80 

E0 

A8 

C0 

E0 

D8 

A0 

E828 

E0 

F0 

D8 

E0 

F0 

A4 

C0 

E0 

BC 

E830 

IE 

01 

0F 

IB 

00 

0B 

3F 

00 

93 

E838 

07 

1A 

00 

0 A 

ID 

00 

05 

2A 

77 

E840 

00 

02 

2F 

00 

02 

3F 

00 

0C 

7E 

E848 

68 

80 

E0 

DC 

00 

D0 

24 

00 

98 

E850 

20 

F4 

00 

D0 

F0 

00 

D0 

EC 

90 

E858 

00 

A0 

B8 

00 

90 

EC 

00 

40 

14 

E860 

00 

00 

0 0 

00 

00 

00 

00 

00 

00 

E868 

00 

00 

00 

00 

00 

00 

00 

01 

01 

E870 

00 

01 

03 

01 

03 

07 

02 

07 

18 

E878 

00 

00 

00 

00 

00 

00 

00 

00 

00 

SUM: 

98 

A7 

3D 

CO 

5E 

99 

C3 

44 008D 

E880 

00 

00 

00 

00 

00 

00 

00 

80 

80 

E888 

00 

80 

C0 

80 

C0 

C0 

E0 

E0 

00 

E890 

07 

03 

07 

07 

00 

07 

03 

00 

22 

E898 

03 

00 

00 

00 

00 

00 

00 

00 

03 

E8A0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

E8A8 

E0 

C0 

E0 

C0 

00 

C0 

00 

80 

80 

E8B0 

80 

00 

00 

00 

00 

00 

00 

00 

80 

E8B8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

E8C0 

00 

00 

00 

0A 

0F 

0F 

15 

3F 

7C 

E8C8 

3F 

2A 

3F 

3F 

15 

7F 

7F 

2A 

24 

E8D0 

7F 

7F 

15 

7F 

7F 

28 

79 

79 

2B 

E8D8 

00 

00 

00 

A0 

F0 

F0 

54 

FC 

D0 

B8E0 

FC 

B8 

FC 

FC 

5C 

FE 

FE 

AE 

B2 

E8E8 

FE 

FE 

5C 

FE 

FE 

8E 

9E 

9E 

IE 

E8F0 

11 

79 

79 

2A 

7F 

7F 

15 

7F 

BF 

E8F8 

7F 

0A 

7F 

7F 

05 

3F 

3F 

02 

0C 


E900 

3F 

3F 

01 

0F 

OF 

00 

00 

00 

9D 

E908 

1C 

9 IS 

9E 

AA 

FF. 

FE 

5C 

FE 

58 

E910 

FE 

A8 

FE 

FE 

54 

FC 

FC 

A8 

96 

E918 

FC 

FC 

50 

F0 

F0 

00 

00 

00 

28 

E920 

00 

00 

00 

00 

00 

00 

05 

07 

0C 

E928 

07 

OA 

IF 

IF 

15 

IF 

IF 

0A 

AC 

E930 

3F 

3F 

15 

3F 

3F 

08 

3D 

3D 

93 

E938 

00 

00 

00 

00 

00 

00 

40 

E0 

20 

E940 

E0 

B8 

F8 

F8 

58 

F8 

F8 

AC 

7C 

E948 

FC 

FC 

5C 

FC 

FC 

AC 

BC 

BC 

70 

E950 

15 

3D 

3D 

0A 

3F 

3F 

15 

3F 

6B 

E958 

3F 

0A 

3F 

3F 

05 

IF 

IF 

00 

0A 

E960 

07 

07 

00 

00 

00 

00 

00 

00 

0E 

E968 

1C 

BC 

BC 

E8 

BC 

FC 

5C 

BC 

4C 

E97 0 

FC 

A8 

F8 

F8 

50 

F8 

F8 

A0 

74 

E97 8 

E0 

E0 

00 

00 

00 

00 

00 

00 

C0 

SUM: 

CA 

10 

A5 

22 

49 

17 

35 

D7 06A5 

E980 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

E988 

00 

02 

03 

03 

05 

0F 

0F 

0A : 

: 35 

E990 

0F 

0F 

15 

IF 

IF 

08 

ID 

ID : 

: B3 

E998 

00 

00 

00 

00 

0 0 

00 

00 

00 : 

: 00 

E9A0 

00 

80 

C0 

C0 

50 

F0 

F0 

A0 : 

: D0 

E9A8 

F0 

F0 

58 

F8 

KB 

A8 

B8 

B8 : 

: 40 

E9B0 

15 

ID 

ID 

0A 

IF 

IF 

15 

IF : 

: CB 

E9B8 

IF 

0A 

0F 

0F 

0 1 

03 

03 

00 : 

: 4E 

E9C0 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

E9C8 

18 

B8 

B8 

E8 

B8 

F8 

D0 

30 : 

: 20 

E9D0 

F0 

E0 

30 

F0 

10 

C0 

C0 

00 : 

: B0 

E9D8 

00 

00 

0 0 

00 

00 

00 

00 

00 : 

: 00 

E9E0 

00 

0 0 

00 

00 

00 

00 

00 

00 : 

: 00 

E9E8 

00 

00 

00 

00 

01 

03 

03 

02 : 

: 09 

E9F0 

07 

0 7 

05 

OF 

OF 

OB 

0D 

0D : 

: 53 

E9F8 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

SUM: 

42 

47 

49 

DA 

94 

94 

8C 

DD FF36 

EA00 

00 

00 

00 

00 

■10 

C0 

C0 

A0 

60 

EA08 

E0 

E0 

50 

F0 

F0 

A0 

B0 

B0 

F0 

EA10 

05 

0D 

0D 

0A 

0F 

0F 

05 

07 

53 

EA18 

07 

02 

03 

03 

00 

00 

00 

00 

0F 

EA20 

00 

00 

00 

00 

00 

00 

00 

00 

00 

EA28 

10 

B0 

B0 

E0 

B0 

F0 

60 

20 

70 

EA30 

E0 

60 

20 

E0 

C0 

00 

C0 

00 

C0 

EA38 

00 

00 

00 

00 

00 

00 

00 

00 

00 

EA40 

00 

00 

00 

00 

00 

00 

00 

00 

00 

EA48 

00 

00 

00 

00 

00 

00 

00 

02 

02 

EA50 

03 

03 

05 

07 

07 

00 

05 

05 

23 

EA58 

00 

00 

00 

00 

00 

00 

00 

00 

00 

EA60 

00 

00 

00 

00 

00 

00 

00 

80 

80 

EA68 

CO 

C0 

40 

EO 

KO 

AO 

A0 

A0 

60 

EA70 

05 

0 7 

07 

02 

07 

07 

01 

03 

27 

EA78 

03 

00 

00 

00 

00 

00 

00 

00 

03 

SUM: 

A7 

C9 

7C 

A6 

9D 

06 

3B 

Al F08E 

EA80 

00 

00 

00 

00 

00 

00 

00 

00 

00 

EA88 

40 

E0 

EO 

E0 

AO 

E0 

70 

10 

E0 

EA90 

F0 

70 

10 

F0 

7 0 

00 

F0 

20 

E0 

EA98 

00 

60 

00 

00 

00 

00 

00 

00 

60 

EAA0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

EAA8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

EAB0 

00 

00 

01 

01 

01 

00 

01 

01 

05 

EAB8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

EAC0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

EAC8 

00 

00 

0 0 

80 

80 

E0 

80 

E0 

40 

EAD0 

01 

03 

03 

00 

01 

01 

01 

00 

0A 

EAD8 

01 

01 

00 

01 

01 

00 

01 

00 

05 

EAE0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

EAE8 

70 

80 

F0 

F8 

20 

F8 

F8 

10 

F8 

EAF0 

F8 

F8 

10 

F8 

F8 

00 

F8 

F8 

E0 

EAF8 

00 

F8 

60 

00 

60 

00 

00 

00 

B8 

SUM: 

9A 

24 

54 

42 

0B 

B9 

D3 

19 A872 

EB00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

EB08 

00 

00 

0 0 

00 

00 

00 

00 

02 

02 

EB10 

00 

0 2 

00 

00 

00 

05 

00 

05 

0C 

EB18 

00 

00 

00 

00 

00 

00 

00 

00 

00 

EB20 

00 

00 

00 

00 

00 

00 

00 

50 

50 

EB28 

00 

50 

00 

00 

00 

68 

00 

68 

20 

EB30 

08 

00 

08 

01 

00 

01 

0B 

00 

ID 

EB38 

0B 

09 

00 

09 

01 

00 

01 

04 

23 

EB40 

00 

04 

00 

00 

00 

00 

00 

00 

04 

EB48 

F4 

00 

F4 

F8 

20 

F8 

F8 

10 

00 

EB50 

F8 

F8 

10 

F8 

F8 

00 

F8 

F4 

DC 

EB58 

00 

F4 

08 

00 

08 

BO 

00 

80 

04 

EB60 

00 

00 

00 

10 

00 

10 

04 

00 

24 

EB68 

04 

10 

00 

10 

28 

00 

28 

43 

B7 

EB7 0 

00 

4 3 

00 

00 

00 

A5 

00 

A 5 

8D 

EB7 8 

40 

00 

40 

20 

00 

20 

82 

00 

42 

SUM: 

43 

9E 

54 

3A 

49 

BB 

AA 

2F 34IE 

EB80 

82 

11 

00 

11 

00 

00 

00 

50 

: F4 

EB88 

00 

50 

Al 

00 

Al 

28 

00 

28 

: E2 

EB90 

0C 

00 

0C 

41 

00 

41 

0A 

00 

: A4 

EB98 

0A 

29 

00 

29 

05 

00 

05 

44 

: AA 


EBA0 

00 

44 

22 

00 

22 

00 

00 

00 

88 

EBA8 

B7 

00 

B7 

DA 

00 

DA 

B9 

10 

EB 

EBB0 

B9 

E8 

00 

E8 

50 

00 

50 

D5 

FE 

EBB8 

00 

D5 

88 

00 

B 8 

81 

00 

81 

E7 

EBC0 

08 

00 

08 

02 

00 

02 

10 

00 

24 

EBC8 

10 

20 

00 

20 

48 

00 

4 B 

03 

E3 

EBD0 

00 

03 

02 

00 

02 

A4 

00 

A4 

4F 

EBD8 

22 

00 

22 

0 1 

00 

01 

80 

00 

C6 

EBE0 

80 

10 

00 

10 

80 

00 

80 

08 

A8 

EBE8 

00 

08 

10 

00 

10 

18 

00 

18 

58 

EBF0 

0C 

00 

0C 

81 

00 

81 

12 

00 

2C 

EBF8 

12 

4 9 

00 

49 

11 

00 

11 

00 

C6 

SUM: 

E0 

0F 

56 

3A 

8B 

04 

93 

E9 486B 

EC00 

00 

00 

8C 

00 

8C 

82 

00 

82 

1C 

EC08 

0B 

00 

0B 

09 

00 

09 

09 

00 

31 

EC 10 

0 9 

00 

00 

0 0 

00 

00 

00 

C3 

CC 

EC 18 

00 

C3 

94 

00 

9 4 

89 

00 

89 

FD 

EC20 

08 

00 

08 

02 

00 

02 

10 

00 

24 

EC28 

10 

24 

00 

24 

4 B 

0 0 

48 

02 

EA 

EC30 

00 

02 

00 

00 

00 

A0 

00 

A0 

42 

EC38 

22 

00 

22 

01 

00 

0 1 

88 

00 

CE 

EC40 

88 

00 

00 

00 

00 

00 

00 

00 

88 

EC48 

00 

00 

00 

00 

00 

00 

00 

00 

00 

EC50 

00 

00 

00 

A0 

00 

A0 

00 

00 

40 

EC58 

00 

40 

00 

40 

11 

00 

11 

00 

A2 

EC60 

00 

00 

8A 

00 

8A 

02 

00 

02 

18 

EC68 

01 

00 

01 

00 

00 

00 

01 

00 

03 

EC70 

01 

00 

00 

00 

00 

00 

00 

01 

02 

EC78 

00 

01 

94 

00 

94 

88 

00 

88 

39 

SUM: 

D8 

2A 

74 

10 

97 

El 

FB 

FB 00B1 

EC80 

08 

00 

08 

00 

00 

00 

40 

00 

50 

EC88 

40 

00 

00 

00 

40 

00 

40 

00 

C0 

EC90 

00 

00 

00 

00 

00 

80 

00 

80 

00 

EC98 

22 

00 

22 

01 

00 

01 

00 

00 

46 

ECA0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

ECA8 

00 

00 

00 

0 0 

00 

00 

00 

00 

00 

ECB0 

00 

00 

00 

80 

00 

80 

00 

00 

00 

ECB8 

00 

40 

00 

4 0 

00 

00 

00 

00 

80 

ECC0 

00 

00 

80 

0 0 

80 

02 

0 0 

02 

04 

ECC8 

01 

00 

01 

00 

00 

00 

01 

00 

03 

ECD0 

01 

00 

00 

00 

0 0 

00 

00 

01 

02 

ECD8 

00 

01 

00 

00 

00 

88 

00 

88 

11 

ECE0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

ECE8 

00 

00 

00 

00 

0 0 

00 

00 

00 

00 

ECF0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

ECF8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

SUM: 

6C 

41 

AB 

Cl 

C0 

8B 

81 

0B CCA3 

ED00 

00 

00 

08 

00 

00 

00 

00 

00 

00 

ED08 

00 

00 

00 

00 

00 

00 

00 

00 

00 

ED 10 

00 

00 

00 

00 

00 

00 

00 

00 

00 

ED18 

00 

00 

00 

00 

0 0 

00 

00 

00 

00 

ED20 

00 

00 

00 

00 

00 

00 

00 

00 

00 

ED28 

00 

00 

00 

00 

00 

00 

00 

00 

00 

ED30 

00 

00 

00 

00 

00 

00 

00 

00 

00 

ED38 

00 

00 

00 

00 

00 

00 

00 

00 

00 

ED40 

00 

00 

00 

00 

00 

00 

00 

00 

00 

ED48 

00 

00 

00 

00 

00 

00 

00 

00 

00 

ED50 

00 

00 

00 

00 

00 

00 

00 

00 

00 

ED58 

00 

00 

00 

00 

00 

00 

00 

00 

00 

ED60 

AF 

32 

OE 

00 

32 

0F 

00 

CD 

FD 

ED68 

B7 

ED 

CD 

EC 

ED 

CD 

1A 

FB 

2C 

ED70 

C3 

8B 

EF 

CD 

44 

FB 

2A 

B9 

2C 

ED78 

F8 

22 

A3 

FA 

21 

02 

02 

22 

FE 

SUM: 

21 

CC 

6D 

B3 

84 

D9 

46 

A3 14EC 

ED80 

19 

F9 

21 

C0 

E8 

06 

0B 

22 

0E 

ED88 

17 

F9 

CD 

F7 

F8 

11 

60 

00 

3D 

ED90 

19 

11 

00 

40 

IB 

7A 

B3 

20 

D2 

ED98 

FB 

10 

EC 

CD 

37 

FB 

18 

03 

11 

EDA0 

CD 

2A 

FB 

06 

32 

C5 

CD 

24 

E0 

EDA8 

FB 

01 

00 

20 

0B 

79 

B0 

20 

70 

BDB0 

FB 

Cl 

10 

FI 

C3 

44 

FB 

3E 

FD 

EDB8 

27 

32 

26 

00 

11 

2B 

EF 

CD 

77 

EDC0 

0B 

00 

06 

0B 

11 

4C 

EF 

CD 

35 

EDC8 

0B 

00 

11 

5A 

EF 

CD 

0B 

00 

3D 

EDD0 

10 

F2 

11 

68 

EF 

3E 

0D 

CD 

82 

EDD8 

13 

00 

CD 

0B 

00 

01 

07 

18 

0B 

EDE0 

ED 

43 

0E 

00 

3A 

89 

EF 

3C 

2C 

EDE8 

CD 

F0 

FA 

C9 

3E 

27 

32 

26 

3D 

EDF0 

00 

21 

B6 

F8 

11 

B7 

F8 

01 

90 

EDF8 

3C 

00 

36 

00 

ED 

B0 

ED 

4B 

47 

SUM: 

5D 

77 

F4 

74 

A8 

A8 

B1 

F4 87AA 

EE00 

89 

EF 

11 

A5 

00 

CD 

D5 

FA 

: CA 

EE08 

11 

00 

BA 

19 

E5 

DD 

El 

01 

: 88 

EE 10 

01 

01 

ED 

43 

0E 

00 

21 

CB 

: 2C 

BE 18 

F8 

11 

DB 

F8 

22 

F3 

F8 

ED 

: D6 

EE20 

53 

F5 

F8 

16 

0B 

IE 

0F 

DD 

: 6B 

EE28 

7E 

00 

D5 

CD 

75 

EE 

D1 

87 

: DB 

EE30 

87 

01 

E3 

EE 

6F 

26 

00 

09 

: F7 

EE38 

7E 

CD 

C8 

04 

23 

7E 

CD 

C8 

: 4D 

EE40 

04 

ED 

4B 

0E 

00 

0D 

0D 

04 

: 68 


SUM: B2 25 4B 52 31 77 34 8B 72B3 
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EE48 

ED 

43 

0E 

00 

23 

7E 

CD 

C8 

: 74 

EE50 

04 

23 

7 E 

CD 

C8 

04 

3A 

0F 

: 87 

EE58 

00 

3D 

32 

0F 

00 

DD 

23 

ID : 

: 9B 

EE60 

C2 

27 

EE 

3A 

0F 

00 

3C 

3C : 

: 98 

EE68 

32 

0F 

00 

3E 

01 

32 

0E 

00 : 

: C0 

EE70 

15 

C2 

25 

EE 

C9 

FE 

06 

28 : 

: DF 

EE7 8 

OE 

FE 

07 

28 

0A 

FE 

08 

28 : 

: 73 

SUM: 

75 

4A 

2E 

46 

F5 

E7 

0B 

6C 6544 

EE80 

06 

FE 

09 

28 

02 

18 

0A 

47 

AO 

EE88 

3A 

Cl 

F8 

3C 

32 

Cl 

F8 

78 

92 

EE90 

C9 

FE 

20 

D8 

FE 

30 

DA 

C8 

8F 

EE98 

EE 

FE 

40 

DA 

B6 

EE 

CD 

D5 

4C 

EEA0 

EE 

EB 

2 A 

F5 

F8 

73 

23 

72 

F8 

EEA8 

11 

03 

00 

19 

E6 

07 

77 

23 

B4 

EEB0 

23 

22 

F5 

F8 

AF 

C9 

CD 

D5 

4C 

EEB8 

EE 

EB 

2A 

F3 

F8 

73 

23 

72 

F6 

EEC0 

23 

23 

23 

22 

F3 

F8 

AF 

C9 

EE 

EEC8 

CD 

D5 

EE 

22 

B9 

F8 

E6 

07 

50 

EED0 

32 

BE 

F8 

AF 

C9 

47 

3E 

OF 

F4 

EED8 

93 

6F 

3E 

0B 

92 

67 

29 

24 

91 

EEE0 

2C 

78 

C9 

20 

20 

20 

20 

80 

6D 

EEE8 

81 

90 

91 

60 

6i 

70 

71 

62 

A6 

EEF0 

63 

72 

73 

64 

65 

74 

75 

66 

60 

EEF8 

67 

76 

77 

A0 

Al 

B0 

B1 

A2 

98 

SUM: 

33 

CB 

35 

91 

FB 

FF 

E6 

25 6751 

EF00 

A3 

B2 

B3 

A4 

A 5 

B4 

B5 

A6 

60 

EF08 

A7 

B6 

B7 

A 8 

A9 

B8 

B9 

AA 

80 

EF10 

AB 

BA 

BB 

AC 

AD 

BC 

BD 

AE 

A0 

EF18 

AF 

BE 

BF 

08 

09 

18 

19 

0A 

78 

EF20 

0B 

1A 

IB 

00 

0D 

1C 

ID 

0E 

A0 

EF28 

0F 

IE 

IF 

68 

6C 

6D 

6C 

6D 

66 

EF30 

6C 

6D 

6C 

6D 

6C 

6D 

6C 

6D 

64 

EF38 

6C 

6D 

6C 

6D 

6C 

6D 

6C 

6D 

64 

EF40 

6C 

6D 

6C 

6D 

6C 

6D 

6C 

6D 

64 

EF48 

6C 

6D 

69 

00 

0D 

6A 

09 

09 

CB 

EF50 

09 

20 

20 

20 

20 

20 

20 

20 

E9 

EF58 

6B 

00 

0D 

7A 

09 

09 

09 

20 

2D 

EF60 

20 

20 

20 

20 

20 

20 

7B 

00 

3B 

EF68 

78 

7C 

70 

7C 

7D 

7C 

7D 

7C 

DF 

EF70 

7D 

7C 

7D 

7C 

7D 

7C 

7D 

7C 

E4 

EF78 

7D 

7C 

7D 

7C 

7D 

7C 

7D 

7C 

E4 

SUM: 

74 

80 

8F 

E9 

8E 

37 

35 

87 B2BC 

EF80 

7D 

7C 

7D 

7C 

7D 

7C 

7D 

79 

El 

EF88 

00 

00 

00 

CD 

06 

EF 

CD 

13 

72 

EF90 

F0 

CD 

48 

FI 

CD 

79 

FI 

3A 

67 

EF98 

Cl 

F8 

01 

IB 

18 

ED 

43 

0E 

2B 

EFA0 

00 

4F 

CD 

F0 

FA 

79 

B7 

CA 

00 

EFA8 

A0 

ED 

01 

25 

18 

ED 

43 

0E 

09 

EFB0 

00 

3A 

C2 

F8 

CD 

F0 

FA 

3A 

E5 

EFB8 

C0 

F8 

B7 

C2 

73 

ED 

21 

00 

B2 

EFC0 

30 

2B 

7C 

B5 

20 

FB 

CD 

IB 

8F 

EFC8 

00 

FE 

13 

CA 

E8 

FA 

CD 

24 

AE 

EFD0 

FB 

CD 

24 

FB 

18 

B5 

3A 

BB 

A9 

EFD8 

F8 

3C 

E6 

03 

32 

BB 

F8 

AF 

B1 

EFE0 

CD 

IB 

00 

CD 

73 

F8 

21 

02 

43 

EFE8 

02 

22 

19 

F9 

CD 

8F 

F5 

2A 

B1 

EFF0 

B9 

F8 

22 

Al 

FA 

ED 

4B 

B6 

5C 

EFF8 

F8 

7D 

81 

32 

B9 

F8 

32 

A3 

AE 

SUM: 

31 

93 

62 

3A 

CF 

E5 

F2 

14 3E28 

F000 

FA 

7C 

80 

32 

BA 

F8 

32 

A4 

B0 

F008 

FA 

CD 

0F 

F9 

CD 

F7 

F8 

CD 

58 

F010 

B3 

F0 

C9 

2A 

C3 

F8 

7D 

B7 

85 

F018 

C8 

CD 

5B 

F0 

D8 

2A 

C3 

F8 

9D 

F020 

CD 

4D 

05 

44 

4D 

ED 

50 

CD 

BA 

F028 

32 

FI 

2A 

C3 

F8 

3 A 

Q5 

F8 

FF 

F030 

85 

6F 

3A 

C6 

F8 

84 

67 

CD 

A4 

F038 

4D 

05 

44 

4D 

ED 

51 

03 

14 

38 

F040 

ED 

51 

21 

27 

00 

09 

44 

4D 

20 

F048 

3E 

0F 

82 

ED 

79 

03 

3C 

ED 

61 

F050 

79 

21 

00 

00 

22 

C5 

F8 

22 

9B 

F058 

C3 

F8 

C9 

3 A 

C5 

F8 

FE 

01 

7A 

F060 

CA 

78 

F0 

FE 

FF 

CA 

7C 

F0 

65 

F068 

3A 

C6 

F8 

FE 

01 

CA 

98 

F0 

49 

F070 

FE 

FF 

CA 

9C 

F0 

C3 

67 

F5 

72 

F078 

2C 

2C 

18 

01 

2D 

CD 

4D 

05 

BD 

SUM: 

D5 

9A 

96 

46 

C9 

FA 

27 

FD BF39 

F080 

44 

4D 

ED 

78 

FE 

20 

C2 

67 

3D 

F088 

F5 

21 

28 

00 

09 

44 

4D 

ED 

C5 

F090 

78 

FE 

20 

C2 

67 

F5 

B7 

C9 

34 

F098 

04 

24 

18 

01 

25 

CD 

4D 

05 

A5 

F0A0 

44 

4D 

ED 

78 

FE 

20 

C2 

67 

3D 

F0A8 

F5 

03 

ED 

78 

FE 

20 

C2 

67 

A4 

F0B0 

F5 

B7 

C9 

2A 

B9 

F8 

CD 

4D 

6A 

F0B8 

05 

44 

4D 

ED 

78 

21 

IF 

FI 

2C 

F0C0 

E5 

FE 

A0 

CA 

13 

FI 

FB 

A2 

FI 

F0C8 

CA 

14 

FI 

FB 

A4 

CA 

15 

FI 

41 

F0D0 

FE 

A6 

CA 

16 

FI 

El 

21 

32 

A9 

F0D8 

FI 

E5 

FE 

A 8 

CA 

17 

FI 

FE 

4C 

F0E0 

AA 

CA 

17 

FI 

FE 

AC 

CA 

17 

07 

F0E8 

FI 

FE 

AE 

CA 

17 

FI 

El 

CD 

ID 


F0F0 

F9 

F0 

D0 

3E 

FF 

32 

C0 

F8 : 

: E0 

F0F8 

C9 

FE 

20 

D8 

03 

ED 

78 

FE : 

: 25 

SUM: 

03 

2E 

4B 

99 

49 

EE 

8B 

CB 7A5D 

F100 

2 0 

D8 

21 

27 

00 

09 

44 

4D 

DA 

F108 

ED 

78 

FE 

20 

D8 

03 

ED 

78 

C3 

FI 10 

FE 

20 

C9 

C9 

C9 

C9 

C9 

3A 

45 

FI 18 

C2 

F8 

3C 

32 

C2 

F8 

C9 

3A 

E5 

F120 

Cl 

F8 

3D 

32 

Cl 

F8 

21 

00 

02 

FI 28 

00 

22 

C3 

F8 

22 

C5 

F8 

CD 

89 

FI 30 

67 

FC 

3E 

20 

18 

01 

AF 

ED 

76 

FI 38 

79 

03 

ED 

79 

21 

27 

00 

09 

33 

F14 0 

44 

4D 

ED 

79 

03 

ED 

79 

C9 

29 

F148 

21 

CB 

F8 

06 

04 

C5 

E5 

7E 

16 

FI 50 

32 

C7 

F8 

23 

7E 

32 

C8 

F8 

84 

F158 

23 

4E 

23 

46 

23 

ED 

43 

C9 

F6 

F160 

F8 

CD 

BD 

FI 

El 

ED 

5B 

C7 

63 

F168 

F8 

73 

23 

72 

23 

ED 

5B 

C9 

34 

FI 70 

F8 

73 

23 

72 

23 

Cl 

10 

D5 

C9 

F178 

C9 

21 

DB 

F8 

06 

04 

C5 

E5 

7 1 

SUM: 

D9 

82 

2D 

BA 

54 

22 

7F 

4E 3441 

F180 

7E 

32 

C7 

F8 

23 

7E 

32 

C8 

OA 

F188 

F8 

23 

4E 

23 

46 

23 

ED 

43 

25 

F190 

C9 

F8 

7E 

32 

BF 

F8 

23 

7E 

C9 

F198 

32 

BD 

F8 

CD 

B5 

F2 

El 

ED 

29 

F1A0 

5B 

C7 

F8 

73 

23 

72 

23 

ED 

32 

F1A8 

5 B 

C9 

F8 

73 

23 

7 2 

23 

3A 

81 

F1B0 

BF 

F8 

77 

23 

3A 

BD 

F8 

77 

B7 

F1B8 

23 

Cl 

10 

C2 

C9 

3A 

C7 

F8 

78 

F1C0 

B7 

C8 

CD 

9A 

F2 

38 

0A 

CD 

E7 

F1C8 

B9 

FA 

7C 

AD 

FE 

05 

D2 

E3 

94 

FIDO 

FI 

CD 

76 

F2 

22 

C9 

F8 

2A 

33 

F1D8 

C7 

F8 

22 

Al 

FA 

22 

A3 

FA 

3B 

F1E0 

C3 

1C 

F2 

2A 

Cl 

F8 

E5 

CD 

6C 

F1E8 

4D 

05 

4 4 

4D 

CD 

32 

FI 

El 

B4 

FIFO 

3A 

C9 

F8 

85 

6F 

3A 

CA 

F8 

EB 

F1F8 

84 

67 

CD 

4D 

05 

44 

4D 

CD 

68 

SUM: 

FF 

2B 

DE 

08 

3A 

36 

8C 

53 1D0A 

F200 

36 

FI 

2A 

C7 

F8 

22 

Al 

FA 

CD 

F208 

3A 

C9 

F8 

85 

32 

A3 

FA 

32 

81 

F210 

C7 

F8 

3A 

CA 

F8 

84 

32 

A4 

15 

F218 

FA 

32 

C8 

F8 

21 

02 

02 

22 

33 

F220 

19 

F9 

CO 

2F 

F2 

22 

17 

F9 

32 

F228 

CD 

0F 

F9 

CD 

F7 

F8 

C9 

3A 

94 

F230 

BC 

F8 

3C 

E6 

01 

32 

BC 

F8 

BD 

F238 

B7 

28 

05 

11 

60 

E5 

18 

03 

55 

F240 

11 

E0 

E6 

2A 

C9 

F8 

7C 

87 

C5 

F248 

85 

FE 

FE 

CA 

71 

F2 

FE 

02 

AE 

F250 

CA 

67 

F2 

FE 

FF 

CA 

62 

F2 

3E 

F258 

FE 

0 1 

CA 

6C 

F2 

21 

80 

01 

C9 

F260 

19 

C9 

21 

00 

00 

19 

C9 

21 

06 

F268 

60 

00 

19 

C9 

21 

C0 

00 

19 

3C 

F270 

C9 

21 

20 

01 

19 

09 

CD 

B9 

73 

F278 

FA 

7C 

AD 

FE 

4 0 

DA 

8E 

F2 

BB 

SUM: 

24 

B8 

D2 

27 

32 

CD 

03 

81 5BD4 

F280 

FE 

80 

DA 

92 

F2 

FE 

C0 

DA 

74 

F288 

96 

F2 

21 

FF 

00 

C9 

21 

01 

93 

F290 

00 

09 

21 

00 

FF 

C9 

21 

00 

D3 

F298 

01 

C9 

2A 

C7 

F8 

79 

FE 

01 

2B 

F2A0 

CA 

78 

F0 

FE 

FF 

CA 

7C 

F0 

65 

F2A8 

78 

FE 

01 

CA 

98 

F0 

FE 

FF 

C6 

F2B0 

CA 

9C 

F0 

37 

C9 

3A 

BF 

F8 

47 

F2B8 

B7 

C8 

ED 

4B 

C7 

F8 

79 

B0 

9F 

F2C0 

C8 

CD 

F9 

F2 

21 

02 

02 

22 

Cl 

F2C8 

19 

F9 

2A 

C7 

F8 

22 

Al 

FA 

B8 

F2D0 

E5 

CD 

4D 

05 

44 

4D 

CD 

32 

94 

F2D8 

FI 

El 

3A 

C9 

F8 

85 

6F 

3A 

FB 

F2E0 

CA 

F8 

84 

67 

22 

A3 

FA 

22 

8E 

F2E8 

C7 

F8 

CD 

4D 

05 

44 

4D 

CD 

3C 

F2F0 

36 

FI 

CD 

0F 

F9 

CD 

F7 

F8 

B8 

F2F8 

C9 

3 A 

BF 

F8 

3D 

CA 

0D 

F3 

Cl 

SUM: 

9F 

6D 

9B 

E4 

C2 

69 

DC 

D5 CC63 

F300 

3D 

CA 

35 

F3 

3D 

CA 

50 

F3 

79 

F308 

3D 

CA 

BB 

F3 

C9 

2A 

C7 

F8 

17 

F310 

CD 

98 

F0 

30 

13 

CD 

AD 

F3 

05 

F318 

ED 

43 

C9 

F8 

CD 

9A 

F2 

F5 

3F 

F320 

CD 

FB 

F3 

FI 

DC 

F5 

F3 

C9 

39 

F328 

21 

00 

01 

22 

C9 

F8 

21 

E0 

06 

F330 

DA 

22 

17 

F9 

09 

2A 

C7 

F8 

BE 

F338 

CD 

78 

F0 

30 

56 

CD 

D1 

F3 

4C 

F340 

ED 

43 

C9 

F8 

CD 

9A 

F2 

F5 

3F 

F348 

CD 

FB 

F3 

FI 

DC 

F5 

F3 

C9 

39 

F350 

2A 

C7 

F8 

CD 

9C 

FO 

30 

2E 

A0 

F358 

CD 

AD 

F3 

ED 

43 

C9 

F8 

CD 

2B 

F360 

9A 

F2 

F5 

CD 

FB 

F3 

FI 

DC 

09 

F368 

F5 

F3 

C9 

2A 

07 

F8 

CD 

7C 

E3 

F370 

F0 

30 

2D 

CD 

D1 

F3 

ED 

43 

0E 

F378 

C9 

F8 

CD 

9A 

F2 

F5 

CD 

FB 

D7 

SUM: 

C2 

C3 

B3 

4B 

B7 

5A 

E7 

B6 A534 

F380 

F3 

FI 

DC 

F5 

F3 

C9 

21 

00 : 

: 92 


F388 

FF 

22 

C9 

F8 

21 

E0 

E0 

22 


: E5 

F390 

17 

F9 

C9 

21 

01 

00 

22 

C9 


: E6 

F398 

F8 

21 

E0 

DD 

22 

17 

F9 

C9 


: D1 

F3A0 

21 

FF 

00 

22 

C9 

F8 

21 

E0 


: 04 

F3A8 

E3 

22 

17 

F9 

C9 

3A 

C9 

F8 


: D9 

F3B0 

B7 

FA 

C3 

F3 

3A 

B9 

F8 

3C 


: 8E 

F3B8 

47 

3A 

Cl 

F8 

B8 

30 

OE 

01 


: 37 

F3C0 

01 

00 

C9 

3A 

B9 

F8 

47 

3A 


: 36 

F3C8 

C7 

F8 

B8 

38 

F2 

01 

FF 

00 


: Al 

F3D0 

C9 

3A 

CA 

F8 

B7 

FA 

E7 

F3 


: 50 

F3D8 

3A 

BA 

F8 

3C 

47 

3A 

C8 

F8 


: 69 

F3E0 

B8 

30 

0E 

01 

00 

01 

C9 

3A 


; FB 

F3E8 

BA 

F8 

47 

3A 

C8 

F8 

B8 

38 


: E3 

F3F0 

F2 

01 

00 

FF 

C9 

21 

00 

00 


: DC 

F3F8 

22 

C9 

F8 

3A 

BF 

F8 

21 

60 


: 55 

SUM: 

54 

60 

7F 

0B 

B4 

1A 

A3 

C0 

8ABA 

F400 

D6 

11 

00 

03 

19 

3D 

20 

FC 


5C 

F408 

44 

4D 

3A 

BD 

F8 

3C 

E6 

03 


A5 

F410 

32 

BD 

F8 

28 

0A 

3D 

28 

07 


85 

F418 

11 

60 

00 

19 

3D 

20 

FC 

ED 


D0 

F420 

5B 

C9 

F8 

7B 

B7 

C2 

44 

F4 


48 

F428 

3A 

BF 

F8 

FE 

02 

28 

05 

7A 


98 

F430 

B7 

C2 

44 

F4 

7 A 

ED 

44 

C2 


IE 

F438 

44 

F4 

60 

69 

11 

80 

01 

19 


AC 

F440 

22 

17 

F9 

C9 

FA 

4 B 

F4 

01 


35 

F448 

80 

01 

09 

22 

17 

F9 

C9 

24 


A9 

F450 

24 

CD 

4D 

05 

44 

4D 

ED 

50 


11 

F458 

03 

ED 

58 

CD 

69 

F5 

B7 

F8 


22 

F460 

CB 

47 

C2 

67 

F5 

CB 

5F 

C2 


1C 

F468 

67 

F5 

CB 

42 

C2 

67 

F5 

CB 


52 

F470 

43 

CA 

67 

F5 

FE 

14 

CA 

8A 


CF 

F478 

F4 

2A 

B9 

F8 

24 

24 

22 

C3 


FC 

SUM: 

IF 

BB 

1A 

2A 

33 

ID 

59 

83 

D796 

F480 

F 8 

21 

00 

01 

22 

C5 

F8 

C3 


BC 

F488 

67 

F5 

3A 

BE 

F8 

CB 

4F 

28 


8E 

F490 

E8 

B7 

C9 

25 

CD 

4D 

05 

44 


F0 

F498 

4D 

ED 

50 

03 

ED 

58 

CD 

69 


08 

F4A0 

F5 

B7 

F8 

CB 

47 

C2 

67 

E5 


D4 

F4A8 

CB 

5F 

C2 

67 

F5 

CB 

42 

C2 


17 

F4B0 

67 

F5 

CB 

43 

CA 

67 

F5 

FE 


8E 

F4B8 

14 

CA 

CD 

F4 

2A 

B9 

F8 

25 


9F 

F4C0 

25 

22 

C3 

F8 

21 

00 

FF 

22 


44 

F4C8 

C5 

F8 

C3 

67 

F5 

3A 

BE 

F8 


CC 

F4D0 

CB 

4F 

28 

E8 

B7 

C9 

2C 

2C 


02 

F4D8 

CD 

4D 

05 

44 

4D 

ED 

50 

21 


0E 

F4E0 

28 

00 

09 

44 

4 0 

ED 

58 

CD 


D4 

F4E8 

69 

F5 

B7 

F8 

CB 

47 

C2 

67 


48 

F4F0 

F5 

CB 

5F 

C2 

67 

F5 

CB 

62 


6A 

F4F8 

C2 

67 

F5 

CB 

63 

CA 

67 

F5 


72 

SUM: 

99 

6C 

6C 

A4 

00 

C5 

34 

64 

< 

)D04 

F500 

FE 

14 

CA 

16 

F5 

2A 

B9 

F8 


C2 

F508 

2C 

2C 

22 

C3 

F8 

21 

01 

00 


57 

F510 

22 

C5 

F8 

C3 

67 

F5 

3A 

BE 


F6 

F518 

F8 

CB 

4F 

20 

E8 

B7 

C9 

2D 


Cl 

F520 

CD 

4D 

05 

44 

4D 

ED 

50 

21 


0E 

F528 

28 

00 

09 

4 4 

4D 

ED 

58 

CD 


D4 

F530 

69 

F5 

B7 

F8 

CB 

47 

C2 

67 


48 

F538 

F5 

CB 

5F 

C2 

67 

F5 

CB 

62 


6A 

F540 

C2 

67 

F5 

CB 

63 

CA 

67 

F5 


72 

F548 

FE 

14 

CA 

5E 

F5 

2A 

B9 

F8 


0A 

F550 

2D 

2D 

22 

C3 

F8 

21 

FF 

00 


57 

F558 

22 

C5 

F8 

C3 

67 

F5 

3A 

BE 


F6 

F560 

F8 

CB 

4 F 

20 

E8 

B7 

C9 

37 


D1 

F568 

C9 

7A 

CD 

77 

F5 

6F 

7B 

CD 


33 

F570 

77 

F5 

BD 

C8 

85 

6F 

C9 

FE 


AC 

F578 

21 

38 

0B 

FE 

80 

38 

0A 

FE 


22 

SUM: 

FF 

BC 

14 

0A 

Al 

E4 

62 

45 

ACAA 

F580 

A0 

38 

09 

3E 

14 

09 

3E 

F8 


32 

F588 

C9 

3E 

11 

C9 

3E 

12 

C9 

3A 


34 

F590 

BE 

F8 

3D 

CA 

A3 

F5 

3D 

CA 


5C 

F598 

57 

F6 

3D 

CA 

0B 

F7 

30 

CA 


5D 

F5A0 

BF 

F7 

C9 

2 A 

B9 

F8 

CD 

4F 


76 

F5A8 

F4 

D2 

CE 

F5 

21 

60 

CD 

22 


F9 

F5B0 

17 

F9 

3A 

B7 

F8 

B7 

C2 

8B 


FD 

F5B8 

F8 

3A 

B6 

F8 

FE 

01 

CA 

E7 


90 

F5C0 

F5 

FE 

FF 

CA 

IF 

EG 

3A 

B8 


C3 

F5C8 

F8 

B7 

C2 

DB 

F5 

C9 

21 

00 


2B 

F5D0 

01 

22 

B6 

F8 

21 

C0 

CD 

22 


Al 

F5D8 

17 

F9 

C9 

21 

C0 

D0 

22 

17 


C3 

F5E0 

F9 

3E 

04 

32 

BE 

F8 

C9 

2A 


16 

F5E8 

B9 

F8 

CD 

D6 

F4 

DC 

8B 

F8 


Al 

F5F0 

3A 

BB 

F8 

87 

4F 

06 

00 

2 1 


EA 

F5F8 

B1 

FA 

09 

4E 

23 

46 

21 

60 


EC 

SUM: 

E2 

IB 

2D 

04 

E9 

46 

66 

3D 

0479 

F600 

CD 

09 

22 

17 

F9 

2A 

B9 

F8 


: E3 

F608 

2C 

CD 

98 

F0 

D8 

21 

01 

01 


: 1C 

F610 

22 

B6 

F8 

3E 

03 

32 

BB 

F8 


: F9 

F618 

21 

60 

D6 

22 

17 

F9 

C9 

2A 


: 1C 

F620 

B9 

F8 

CD 

IF 

F5 

DC 

8B 

F8 


: FI 

F628 

3 A 

BB 

F8 

87 

4F 

06 

00 

21 


EA 
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F630 

A9 

FA 

09 

4E 

23 

46 

21 

60 


E4 

F638 

CD 

09 

22 

17 

F9 

2A 

B9 

F8 


E3 

F640 

2D 

CD 

98 

F0 

D8 

21 

FF 

01 


7B 

F648 

22 

B6 

F8 

3E 

02 

32 

BE 

F8 


F8 

F650 

21 

60 

D3 

22 

17 

F9 

C9 

2A 


79 

F658 

B9 

F8 

CD 

D6 

F4 

D2 

82 

F6 


92 

F660 

21 

60 

D3 

22 

17 

F9 

3A 

B6 


76 

F668 

F8 

B7 

C2 

8B 

F8 

3A 

B7 

F8 


DD 

F670 

FE 

01 

CA 

9B 

F6 

FE 

FF 

CA 


21 

F67 8 

D3 

F6 

3 A 

B8 

F8 

B7 

C2 

8F 


BB 

SUM: 

B8 

8B 

41 

98 

2D 

CE 

60 

AC 

353A 

F680 

F6 

C9 

21 

01 

00 

22 

B6 

F8 


B1 

F688 

21 

C0 

D3 

22 

17 

F9 

C9 

21 


D0 

F690 

C0 

D6 

22 

17 

F9 

3E 

03 

32 


3B 

F698 

BE 

F8 

C9 

2A 

B9 

F8 

CD 

4F 


76 

F6A0 

F4 

DC 

8B 

F8 

3A 

BB 

F8 

87 


C7 

F6A8 

4F 

06 

00 

21 

A9 

FA 

09 

4E 


70 

F6B0 

23 

46 

21 

60 

D3 

09 

22 

17 


FF 

F6B8 

F9 

2A 

B9 

F8 

24 

CD 

78 

F0 


2D 

F6C0 

D8 

21 

01 

01 

22 

B6 

F8 

3E 


09 

F6C8 

04 

32 

BE 

F8 

21 

60 

D0 

22 


5F 

F6D0 

17 

F9 

C9 

2A 

B9 

F8 

CD 

93 


14 

F6D8 

F4 

DC 

8B 

F8 

3A 

BB 

F8 

87 


C7 

F6E0 

4F 

06 

00 

21 

B1 

FA 

09 

4E 


78 

F6E8 

23 

46 

21 

60 

D3 

09 

22 

17 


FF 

F6F0 

F9 

2A 

B9 

F8 

25 

CD 

78 

F0 


2E 

F6F8 

D8 

21 

01 

FF 

22 

B6 

F8 

3E 


07 

SUM: 

IE 

68 

32 

68 

A4 

2B 

12 

83 

2B85 

F700 

01 

32 

BE 

F8 

21 

60 

CD 

22 


59 

F708 

17 

F9 

C9 

2A 

B9 

F8 

CD 

IF 


A0 

F710 

F5 

D2 

36 

F7 

21 

60 

D6 

22 


6D 

F718 

17 

F9 

3A 

B6 

F8 

B7 

C2 

8B 


FC 

F720 

F8 

3A 

B7 

F8 

FE 

FF 

CA 

4F 


F7 

F728 

F7 

FE 

01 

CA 

87 

F7 

3A 

B8 


30 

F730 

F8 

B7 

C2 

4 3 

F7 

C9 

21 

FF 


94 

F738 

00 

22 

B6 

F8 

21 

C0 

D6 

22 


A9 

F740 

17 

F9 

C9 

21 

C0 

D3 

22 

17 


C6 

F748 

F9 

3E 

02 

32 

BE 

F8 

C9 

2A 


14 

F750 

B9 

F8 

CD 

93 

F4 

DC 

8B 

F8 


64 

F758 

3A 

BB 

F8 

87 

4F 

06 

00 

21 


EA 

F760 

B1 

FA 

09 

4E 

23 

46 

21 

60 


EC 

F768 

D6 

09 

22 

17 

F9 

2A 

B9 

F8 


EC 

F770 

25 

CD 

7C 

F0 

D8 

21 

FF 

FF 


55 

F778 

22 

B6 

F8 

3E 

01 

32 

BE 

F8 


F7 

SUM: 

DC 

77 

56 

CC 

46 

5E 

3A 

BF 

FI 76 

F780 

21 

60 

CD 

22 

17 

F9 

C9 

2A 


73 

F788 

B9 

F8 

CD 

4F 

F4 

DC 

8B 

F8 


20 

F790 

3A 

BB 

F8 

87 

4F 

06 

00 

21 


EA 

F798 

A9 

FA 

09 

4E 

23 

46 

21 

60 


E4 

F7A0 

D6 

09 

22 

17 

F9 

2A 

B9 

F8 


EC 

F7A8 

24 

CD 

7C 

F0 

D8 

21 

FF 

01 


56 

F7B0 

22 

B6 

F8 

3E 

04 

32 

BE 

F8 


FA 

F7B8 

21 

60 

D0 

22 

17 

F9 

C9 

2A 


76 

F7C0 

B9 

F8 

CD 

93 

F4 

D2 

EA 

F7 


B8 

F7C8 

21 

60 

D0 

22 

17 

F9 

3A 

B7 


74 

F7D0 

F8 

B7 

C2 

8B 

F8 

3A 

B6 

F8 


DC 

F7D8 

FE 

01 

CA 

03 

F8 

FE 

FF 

CA 


8B 

F7E0 

3B 

F8 

3A 

B8 

F8 

B7 

C2 

F7 


8D 

F7E8 

F7 

C9 

21 

00 

FF 

22 

B6 

F8 


B0 

F7F0 

21 

C0 

D0 

22 

17 

F9 

C9 

21 


CD 

F7F8 

C0 

CD 

22 

17 

F9 

3E 

01 

32 


30 

SUM: 

DD 

57 

77 

El 

6B 

AA 

CF 

70 

FA4A 

F800 

BE 

F8 

C9 

2A 

B9 

F8 

CD 

D6 


FD 

F808 

F4 

DC 

8B 

F8 

3A 

BB 

F8 

87 


C7 

F810 

4F 

06 

00 

21 

B1 

FA 

09 

4E 


78 

F818 

23 

4 6 

21 

60 

D0 

09 

22 

17 


FC 

F820 

F9 

2A 

B9 

F8 

2C 

CD 

9C 

F0 


59 

F828 

D8 

21 

01 

FF 

22 

B6 

F8 

3E 


07 

F830 

03 

32 

BE 

F8 

21 

60 

D6 

22 


64 

F838 

17 

F9 

C9 

2A 

B9 

F8 

CD 

IF 


A0 

F840 

F5 

DC 

8B 

F8 

3A 

BB 

F8 

87 


CO 

F848 

4F 

06 

00 

21 

A9 

FA 

09 

4E 


70 

F850 

23 

46 

21 

60 

D0 

09 

22 

17 


FC 

F858 

F9 

2A 

B9 

F8 

2D 

CD 

9C 

F0 


5A 

F860 

D8 

21 

FF 

FF 

22 

B6 

F8 

3E 


05 

F868 

02 

32 

BE 

F8 

21 

60 

D3 

22 


60 

F870 

17 

F9 

C9 

FE 

32 

28 

23 

FE 


52 

F878 

34 

28 

26 

FE 

36 

28 

29 

FE 


05 

SUM: 

94 

5C 

C7 

20 

27 

82 

FD 

69 

C292 

F880 

38 

28 

2C 

FE 

20 

20 

04 

3E 


0C 

F888 

01 

18 

01 

AF 

32 

B8 

F8 

21 


CC 

F890 

00 

00 

22 

B6 

F8 

B7 

C4 

5B 


A6 

F898 

FC 

C9 

21 

00 

01 

22 

B6 

F8 


B7 

F8A0 

C9 

21 

FF 

00 

22 

B6 

F8 

C9 


82 

F8A8 

21 

01 

00 

22 

B6 

F8 

C9 

21 


DC 

F8B0 

00 

FF 

22 

B6 

F8 

C9 

00 

00 


98 

F8B8 

00 

00 

00 

00 

00 

00 

00 

00 


00 

F8C0 

00 

00 

00 

00 

00 

00 

00 

00 


00 

F8C8 

00 

00 

00 

00 

00 

00 

00 

00 


00 

F8D0 

00 

00 

00 

00 

00 

00 

00 

00 


00 


F8D8 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

F8E0 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

F8E8 

00 

00 

00 

00 

00 

00 

00 

00 : 

: 00 

F8F0 

00 

00 

00 

00 

00 

00 

00 

D9 : 

: D9 

F8F8 

ED 

5B 

17 

F9 

2A 

19 

F9 

D9 : 

: 6D 

SUM: 

0C 

85 

A8 

34 

45 

41 

30 

4E 8B4B 

F900 

C3 

IB 

F9 

D9 

ED 

5B 

17 

F9 

08 

F908 

2A 

19 

F9 

D9 

C3 

A6 

F9 

D9 

50 

F910 

2 A 

19 

F9 

D9 

C3 

29 

FA 

00 

FB 

F918 

00 

00 

00 

F5 

C5 

D5 

E5 

3A 

AE 

F920 

A4 

FA 

4F 

D9 

08 

7D 

08 

D9 

2C 

F928 

3A 

A3 

FA 

47 

D9 

08 

6F 

08 

76 

F930 

D9 

79 

FE 

17 

D2 

94 

F9 

B7 

7D 

F938 

CA 

94 

F9 

CD 

93 

FA 

CB 

F4 

70 

F940 

78 

FE 

IF 

D2 

82 

F9 

B7 

CA 

63 

F948 

82 

F9 

16 

08 

E5 

D9 

Cl 

D9 

FI 

F950 

D9 

1A 

ED 

79 

13 

1A 

CB 

F8 

49 

F958 

CB 

B0 

ED 

79 

13 

1A 

CB 

F0 

C9 

F960 

ED 

79 

CB 

B8 

13 

3E 

08 

80 

C2 

F968 

47 

D9 

15 

C2 

50 

F9 

04 

23 

67 

F970 

D9 

2D 

D9 

C2 

40 

F9 

0C 

D9 

BF 

F978 

25 

D9 

C2 

28 

F9 

El 

D1 

Cl 

54 

SUM: 

68 

10 

B5 

B4 

A7 

29 

21 

60 38FE 

F980 

FI 

C9 

04 

CD 

93 

FA 

CB 

F4 

D7 

F988 

D9 

E5 

21 

18 

00 

EB 

19 

EB 

E6 

F990 

El 

C3 

71 

F9 

0C 

D9 

E5 

7D 

55 

F998 

21 

18 

00 

EB 

19 

3D 

C2 

9C 

D8 

F9A0 

F9 

EB 

El 

C3 

78 

F9 

F5 

C5 

B3 

F9A8 

D5 

E5 

3A 

A4 

FA 

4F 

D9 

08 

C2 

F9B0 

7D 

08 

D9 

3A 

A3 

FA 

47 

D9 

55 

F9B8 

08 

6F 

08 

D9 

79 

FE 

19 

D2 

BA 

F9C0 

17 

FA 

CD 

93 

FA 

CB 

F4 

78 

A2 

F9C8 

FE 

28 

D2 

05 

FA 

16 

08 

E5 

FA 

F9D0 

D9 

Cl 

D9 

D9 

ED 

78 

12 

13 

D6 

F9D8 

CB 

F8 

CB 

B0 

ED 

78 

12 

13 

C8 

F9E0 

CB 

F0 

ED 

78 

12 

CB 

B8 

13 

C8 

F9E8 

3E 

08 

80 

47 

D9 

15 

C2 

D3 

90 

F9F0 

F9 

04 

23 

D9 

2D 

D9 

C2 

C7 

88 

F9F8 

F9 

0C 

D9 

25 

D9 

C2 

B3 

F9 

4A 

SUM: 

D3 

B3 

3E 

21 

05 

87 

C8 

99 AA42 

FA00 

El 

D1 

Cl 

FI 

C9 

04 

CD 

93 

91 

FA08 

FA 

CB 

F4 

D9 

E5 

21 

18 

00 

B0 

FA10 

EB 

19 

EB 

El 

C3 

F4 

F9 

0C 

8C 

FA18 

D9 

E5 

21 

18 

00 

EB 

7D 

19 

78 

FA20 

3D 

C2 

IF 

FA 

EB 

El 

C3 

FB 

A2 

FA28 

F9 

F5 

C5 

D5 

E5 

F3 

01 

03 

64 

FA30 

1A 

3E 

0B 

ED 

79 

3D 

ED 

79 

6C 

FA38 

3A 

A2 

FA 

4F 

D9 

08 

7D 

08 

8B 

FA40 

D9 

3A 

Al 

FA 

47 

D9 

08 

6F 

45 

FA48 

08 

D9 

79 

FE 

19 

D2 

8E 

FA 

CB 

FA50 

CD 

93 

FA 

78 

FE 

28 

D2 

86 

50 

FA58 

FA 

16 

08 

E5 

D9 

Cl 

D9 

D9 

49 

FA60 

AF 

ED 

79 

3E 

08 

80 

47 

D9 

FB 

FA68 

15 

C2 

5F 

FA 

04 

23 

D9 

2D 

5D 

FA70 

D9 

C2 

53 

FA 

0C 

D9 

25 

D9 

CB 

FA78 

C2 

41 

FA 

FB 

01 

00 

40 

ED 

26 

SUM: 

30 

9F 

EB 

50 

E3 

2D 

4F 

CB 1FAA 

FA80 

78 

El 

D1 

Cl 

FI 

C9 

04 

CD 

76 

FA88 

93 

FA 

D9 

C3 

6F 

FA 

0C 

D9 

77 

FA90 

C3 

76 

FA 

26 

00 

69 

54 

5D 

73 

FA98 

29 

29 

19 

29 

29 

29 

58 

19 

57 

FAA0 

C9 

00 

00 

00 

00 

00 

00 

60 

29 

FAA8 

00 

C0 

00 

20 

01 

80 

01 

20 

82 

FAB0 

01 

E0 

01 

40 

02 

A0 

02 

40 

06 

FAB 8 

02 

F5 

C5 

D5 

ED 

5B 

D2 

FA 

A5 

FAC0 

01 

83 

03 

CD 

D5 

FA 

22 

D2 

17 

FAC8 

FA 

ED 

5F 

32 

D4 

FA 

D1 

Cl 

D8 

FAD0 

FI 

C9 

33 

E9 

00 

21 

00 

00 

F7 

FAD8 

79 

B0 

C8 

CB 

38 

CB 

19 

30 

08 

FAE0 

01 

19 

CB 

23 

CB 

12 

18 

F0 

ED 

FAE8 

3E 

FF 

32 

C0 

F8 

C3 

73 

ED 

4A 

FAF0 

C5 

E5 

6F 

0E 

0A 

CD 

0C 

FB 

05 

FAF8 

7D 

B7 

28 

02 

C6 

10 

C6 

20 

1A 

SUM: 

A9 

AC 

74 

AE 

ED 

62 

FA 

91 39CF 

FB00 

CD 

13 

00 

7C 

C6 

30 

CD 

13 

32 

FB08 

00 

El 

Cl 

C9 

26 

00 

06 

08 

9F 

FB10 

29 

7C 

91 

38 

02 

2C 

67 

10 

13 

FB18 

F7 

C9 

21 

A6 

FC 

CD 

4B 

FB 

96 

FB20 

AF 

32 

A5 

FC 

CD 

6E 

FB 

C3 

7B 

FB28 

8B 

FB 

3E 

01 

32 

A5 

FC 

21 

B9 

FB30 

B5 

FD 

CD 

4B 

FB 

18 

ED 

3E 

08 

FB38 

02 

32 

A5 

FC 

21 

CE 

FD 

CD 

8E 

FB40 

4B 

FB 

18 

E0 

16 

07 

3E 

FF 

98 

FB4 8 

C3 

8F 

FC 

22 

Al 

FC 

22 

A3 

D2 

FB50 

FC 

21 

00 

00 

22 

9F 

FC 

22 

FC 

FB58 

9D 

FC 

3E 

02 

32 

9C 

FC 

32 

D5 

FB60 

9A 

FC 

3E 

01 

32 

9B 

FC 

3E 

DC 

FB68 

FC 

16 

07 

C3 

8F 

FC 

3A 

A5 

46 

FB70 

FC 

B7 

FA 

IE 

FC 

3A 

9F 

FC 

9C 

FB78 

47 

3A 

9D 

FC 

B8 

CC 

A8 

FR 

41 


SUM: 

5E 

3F 

F6 

49 

85 

FD 

3B 

E5 9B54 

FB80 

3A 

9B 

FC 

3D 

CC 

3B 

FC 

32 

43 

FB88 

9B 

FC 

C9 

3A 

A5 

FC 

B7 

FA 

EC 

FB90 

IE 

FC 

3A 

A0 

FC 

47 

3A 

9E 

0F 

FB98 

FC 

B8 

CC 

CD 

FB 

3A 

9C 

FC 

1A 

FBA0 

3D 

CC 

4B 

FC 

32 

9C 

FC 

C9 

E3 

FBA8 

2A 

Al 

FC 

7E 

23 

4E 

23 

46 

IF 

FBB0 

23 

16 

00 

CD 

8F 

FC 

14 

79 

IE 

FBB8 

CD 

8F 

FC 

78 

32 

9F 

FC 

22 

BF 

FBC0 

Al 

FC 

3E 

0F 

16 

08 

32 

9D 

D7 

FBC8 

FC 

CD 

8F 

FC 

C9 

2A 

A3 

FC 

E6 

FBD0 

7E 

23 

4E 

23 

46 

23 

16 

02 

93 

FBD8 

CD 

8F 

FC 

14 

79 

CD 

8F 

FC 

3D 

FBE0 

78 

32 

A0 

FC 

CD 

F5 

FB 

22 

25 

FBE8 

A3 

FC 

3E 

0F 

16 

09 

32 

9E 

DB 

FBF0 

FC 

CD 

8F 

FC 

C9 

3A 

A5 

FC 

F8 

FBF8 

FE 

01 

28 

17 

FE 

02 

CA 

30 

38 

SUM: 

43 

D4 

BA 

03 

C6 

99 

CE 

F3 F2F1 

FC00 

FC 

E5 

11 

B4 

FD 

B7 

ED 

52 

99 

FC08 

El 

30 

01 

C9 

21 

A6 

FC 

22 

C0 

FC10 

Al 

FC 

C9 

E5 

11 

CD 

FD 

B7 

DD 

FC18 

ED 

52 

El 

30 

01 

C9 

3E 

FF 

57 

FC20 

16 

07 

CD 

8F 

FC 

32 

A5 

FC 

48 

FC28 

C9 

3E 

FE 

16 

07 

C3 

8F 

FC 

70 

FC30 

E5 

11 

EF 

FD 

B7 

ED 

52 

El 

B9 

FC38 

30 

E4 

C9 

3A 

9D 

FC 

3D 

32 

IF 

FC40 

9D 

FC 

16 

08 

CD 

8F 

FC 

3A 

49 

FC48 

9A 

FC 

C9 

3A 

9E 

FC 

3D 

32 

A2 

FC50 

9E 

FC 

16 

09 

CD 

8F 

FC 

3A 

4B 

FC58 

9A 

FC 

C9 

3E 

A6 

16 

04 

CD 

2A 

FC60 

8F 

FC 

3E 

06 

C3 

6F 

FC 

3E 

3B 

FC68 

64 

16 

04 

CD 

8F 

FC 

AF 

14 

99 

FC70 

CD 

8F 

FC 

3E 

F8 

16 

07 

CD 

78 

FC78 

8F 

FC 

3E 

10 

16 

0A 

CD 

8F 

55 

SUM: 

ID 

2A 

79 

18 

C5 

8C 

9F 

56 2479 

FC80 

FC 

3E 

10 

14 

CD 

8F 

FC 

3E 

F4 

FC88 

10 

14 

CD 

8F 

FC 

AF 

14 

C5 

04 

FC90 

01 

00 

1C 

ED 

51 

05 

ED 

79 

C6 

FC98 

Cl 

C9 

00 

00 

00 

00 

00 

00 

8A 

FCA0 

00 

00 

00 

00 

0 0 

00 

FD 

00 

FD 

FCA8 

0B 

51 

01 

0B 

A9 

01 

0E 

7B 

9B 

FCB0 

01 

0B 

7B 

01 

0C 

A9 

01 

0E 

4C 

FCB8 

7B 

01 

0D 

65 

01 

0A 

FD 

00 

F6 

FCC0 

0B 

51 

01 

0B 

A9 

01 

0E 

7B 

9B 

FCC8 

01 

0D 

7B 

01 

0C 

A9 

01 

0E 

4E 

FCD0 

7B 

01 

0D 

65 

01 

0A 

51 

01 

4B 

FCD8 

0E 

FD 

00 

0B 

FD 

00 

0B 

El 

FF 

FCE0 

00 

0B 

El 

00 

0B 

D4 

00 

0B 

D6 

FCE8 

D4 

00 

0C 

FD 

00 

0B 

FD 

00 

E5 

FCF0 

0E 

El 

00 

0C 

D4 

00 

0E 

El 

BE 

FCF8 

00 

0B 

FD 

00 

0B 

1C 

01 

0B 

3B 

SUM: 

CC 

CB 

F5 

86 

6D 

A6 

7D 

67 2520 

FD00 

3E 

01 

0B 

51 

01 

0B 

3E 

01 

E6 

FD08 

0C 

1C 

01 

09 

1C 

01 

0E 

FD 

5A 

FD10 

00 

0B 

FD 

00 

0B 

El 

00 

0B 

FF 

FD18 

El 

00 

0B 

1C 

01 

0B 

1C 

01 

31 

FD20 

0C 

FD 

00 

0B 

FD 

00 

0B 

51 

6D 

FD28 

01 

0E 

7B 

01 

0B 

3E 

01 

0B 

E0 

FD30 

FD 

00 

0B 

D4 

00 

0B 

El 

00 

C8 

FD38 

07 

FD 

00 

07 

El 

00 

00 

FD 

E9 

FD40 

00 

08 

51 

01 

0A 

A9 

01 

0E 

1C 

FD48 

7B 

01 

0B 

7B 

01 

0C 

A9 

01 

B9 

FD50 

0E 

7B 

01 

0C 

51 

01 

07 

FD 

EC 

FD58 

00 

0B 

51 

01 

0A 

A9 

01 

0E 

IF 

FD60 

7B 

01 

0C 

A9 

01 

0E 

7B 

01 

BC 

FD68 

0C 

51 

01 

08 

51 

01 

0E 

FD 

C3 

FD70 

00 

0B 

FD 

00 

0B 

El 

00 

0B 

FF 

FD78 

El 

00 

0B 

51 

01 

0B 

51 

01 

9B 

SUM: 

2D 

1C 

5D 

E8 

D6 

9B 

El 

87 07A8 

FD80 

0C 

FD 

00 

0 A 

0C 

01 

0E 

FD 

2B 

FD88 

00 

0C 

El 

00 

0E 

D4 

00 

07 

D6 

FD90 

BD 

00 

0C 

D4 

00 

0D 

El 

00 

8B 

FD98 

0C 

FD 

00 

0E 

El 

00 

0B 

D4 

D7 

FDA0 

00 

0C 

El 

00 

0E 

FD 

00 

0C 

04 

FDA8 

0C 

01 

0E 

2D 

01 

0C 

1C 

01 

72 

FDB0 

0E 

FD 

00 

00 

00 

47 

00 

0D 

5F 

FDB8 

3F 

00 

0D 

47 

00 

0D 

3F 

00 

DF 

FDC0 

0D 

47 

00 

0D 

3F 

00 

0D 

3B 

E8 

FDC8 

00 

0A 

00 

00 

0 A 

00 

DD 

01 

F2 

FDD0 

0D 

7D 

02 

0D 

DD. 01 

0D 

7D 

01 

FDD8 

02 

0D 

DD 

01 

0D 

A3 

02 

0D 

AC 

FDE0 

BB 

03 

0A 

23 

03 

0D 

85 

03 

83 

FDE8 

0D 

BB 

03 

0B 

00 

00 

0A 

00 

E0 

FDF0 

03 

77 

53 

5A 

56 

77 

CE 

9F 

61 

FDF8 

EB 

2E 

CE 

9F 

D3 

15 

FF 

FF 

6C 

SUM: 

00 

4E 

F6 

A2 

69 

7C 

AA 

59 

19FF 


174 Oh! MZ 1987.8. 
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►$»!#& Sound Clipper 

► How to C 

► ^XXVd'X'MS-DOS 

► VXh^lflm-r§ r Z’sWORD JGj 

► '>-il/S2-T-f Ut-t Who’s Who 



mm i :i«tt3P , c*oOT// 

• 7**Jl/X*-2/X*FM LIFE GAME 

• (5<®iigA35Ur-*FM JIGSAW PUZZLE 
•tffiitXSxL'—XaX 

fcun .'mmznmJi/a'sMnvt:/ 

• wm/w&MMBM/mm/xti/im 'mm 

WordStar^TX&BASICTTXMl^X-Jb 

XULXX’ U—ibljr-f 37 SE 

SFXxTXPX^A 

FLEX£2DDr“tefco 

4096&E— K+8 tfXX'JXXffl ttKtmA— KZItT— 
OS-9DBSflEfi£ MW-CffllSAMTXXXi-X 



►mn \±v*?)\K7&- 

^ffift3JHB©*ax-vss±sEK 


►«H2 i a^mia)mi7^=^ 

xo^AiettcD^«S3giiz:5o<-s 

►+r- xpxixk / 2*tt©o AW*«iiarsx u x ^ xws« 

► PXEx-XSiiuilg / HftA3EByKv'-l'XPXPlz'A* 
►XD^ASH'VffliBfS / SMALLTALK 
11 *S!J$ £!S©fc&©A-F , Xi7 , Sfil / 6tt®fctt®V7S0x7 
S5S / 1 «£Mif P> Ba-X0D*Qf§ / Mawam^-esR^-H#*! 
*/ B±vx*-atttia* laxox^Aisit / s«*s-bsgasl* 


FORTRAN-COBOL 

SiJfflttiH BSW62S®10E1iS^gfci®£iai&giB8«--xt 




!|$3I 1 7|\7t^ s —A'CS®5^ V—/ 

nunix-f uxxxxkp-a / m+t^xx-A 
X S4E / X S0;b7®WJ^ / ^T^XCQJg «* 

4$H2 (D<t:CU**)Wb*l-U7lt-h 

PXS3X / +f-XPiJHK^XS b-X / atUflSBS/U 

7fA / -jyy^v-'J—y n ^ 

XT->^16 

X+tM'x-OX- LUT-K / *x5//^P»» / £■■£■» 

E***-*^* tg^HiWfE/1943 B » 

xmisn 

SiJBib/lt-h 


h^AT-c >x/ yyy'y'J-'J-y/ k^pxaxx- 
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A MZ-2500«ffifflUrt\^?o P 
OKE@ f—=>- 

Jtatm k#s*3i mzz-vyyy&m 
PEEK® Sfflur^-P^KTS’S'S 
mma?z*-D-^%m2> 75%&mz 
Z<n-&l\ontZ& WIDTH40TLOC 
ATE10, 10 : PRINT" ! ” 8|b)DSHTS 
£t*<£-5£LTPOKE@ &H38, 410,33<t 
r ijsit^gsc 
IS, POKE@&H38, 410, 33*4tU££l7 
niS£D3:t+^o-)5,LOCATE10,10:P 
RINT“A” 8UTT A = PEEK@ (&H38, 
410) t&Zii, A = 65"CIS®:<A=4 t.U 
m^SB m 
VRAMSP7 
feAUT PRINTV>SCRN$ 
Dtg^gSCtSUTTiWeiAi: 
l\o10irC3V3o 

MZ-2500H— y-wmf5®i5.to\z, m 
mct^SlftBJUggt, POKEOtP 
EEK@IS1T*©V. ; EU7D'V17(^V. ; E I J 
S8K/\''i / hZ7:C(E5D^Sfe©) mZ> 
t\yhgKU7CgS*§2VuS0§®Attl 
usd g-^DD^r^o jwcas^poKE @ 
£ISVSU7D'v738h©410§S©:ph : U 
7.C33S*SiAa3t0^«C«D»g-o 
V ; EUT r DyV38HlSxdp7,SacTUT’S l J 
EzL-KfflRAMCG^TaD, 40x10+ 
10Sg©VtUC I ”(DT>7&- □-K'C 

^masa/vr®i(io, io)iz*rs 

U <£ O 8 0 V"5 © S $§ £ /uffifiO© 
Tfo 

£C3tfZ©K*IS-53Kt\£^1±/ur 
USo MZ-2500©7*7hVRAMI3» 
sagnTu^ffliSAA^-z-Kris® 
r n?ROM 

F*3©yrT'-tZ'VhT , KU7,j sg'srg-o ^ 
^^©T^hfeH^ROMCA^T© 
^>©T*g-o 

yi—-y—X : ZZnJ > ) WD r M B38, MB39 
©Sfflj 4H£;ns / '\-22SfiT<S£iA 
c©^-2rasaaM8E»52f®3fc 
©ffi, ASS&EUhSfiSIZIS-hfr&Itt 


mtf&znzi\m-$o gg. tttkvr 
AMIS800H/1-TKCTtlZ4T)©7D'V9IZ 

»issn, snsisiiizg*7.M, pk 
UET i-K 7^7h2, sHBBtlvse 
ffitonESUToisrotfoso^g., *is 
jaaj»«*< 3©©7D'v9g-A:-ciz^n 
^niisssaajztc^Di 
£n-5©rg<, (0,0) ©fuBCit^usiT 
niSA71Z'VhPKUA0000„, 0800», 10 
00„C@SAtt3Z£C«DSg«o:PhU 
Ea-his^zzLA)u©taDrg-S'&a 
«-cifts§isust+^o mcsrat^usis 
niS7SArn:33<siTrg-u nmoycK 
fTCIS (HSSDUT’UTfe) 

u^ssi\u£©g£*«:ovcus:-5o 
PdHISx+AM t2C»e5MHB‘Wo 
1§J&S£xTII?ROMffl<TS , <!?ffici:0 
[ZQ^Z^&Cbty^XZibBZ&zioMZ- 
2500CBWCJISJB12K*. SB2dC$* 
n€ni28K/ U K §1256 K/ W h©H?R 
OMSSRSim^g,, 16x16K'vhffl 
S;?77r>hlS32/WhC«D^g-* s 6, 
32/WPS 1 X?:38UT1§$£nT©3 
timw’znmno grca^s^esii® 

CIS¥S©7*>hfeAoTU3T)l7'Cg 
#£>. 8/Kh (8x8K'VH8) 
ffitUT, 2Z©)iilUSBS®r8x16K'V 
h®3t?SSU 4Z©Sl®iT16x16K'V 
hffi^^sg’^oZQoTo^isgrg-o 
n^j'^0ig , 8/WKrg-«'5, ffis©7;? 
77r>pzf«sws4ra^ppu^«ig)e 
g-5CIS188'Vh (256K) IS!l»®riS350 
SI+A/c *»ffl3£'VhBfcE0eS®# 
5TT. <£^T, ±;CZffl158'vUrT'KU 
As^g-^zt^frssg-o 
Z©<£o«T^Sm:£OxCVRAM 
SliDjgoT©*48, g*7.M£2SS 
T)-t+niS168'VhC«DSg-* N 8, SCO 
S15tT‘Vhr»ROM?KU^*lBeu 
§g-oS1 E'VhrPCGSSI^ROMSS 
siJRgsztg'rsggo ususss, 
vzaTgi/ro^Bs-SBoriAst+A/c 

USo x^FAhl ©STfize'VhlSdOlTt 


o^g. 



careCOTfei r=&<r©)r. m ifcAvh 
IS OS'1 S-C16x16K'VhffiS®!lsaiS 
£i!U, ®D6(^'Vhr3l?ROMAKU 
ASS^g^ABU'C^D^go gs, 7 
«h2ISIg5E'VhlMTSW7, §f§6 
tf'VhlS7771zAgS;l?ROMSII17K 
^S^27X^SSSU, »±CZ8'VM?P 
CGSiS^ROMSSJgitgStlAOitS? 
IZ&oClASg,, — SgiSZriASUSS, 
xdP7h2©3«8IZ r il?ROMPKUA 
±£Zj SASGtlzmSTHATcToVK^ 
IfSUSSUSo 

zz=Lp)UDm*o'j-yj’yyziz(D 
sun rgo ^j®ustaDg+7hi # 
M?ROMPKU7ffl*3~10^'VhS, 
^*h2fflfcffi£’Vh«*<7fc?'i/h 
SROMJ7KU7©il11~18E'VhSSU 
gg 0 7:T7M©lg1E'yhT*5t?©£ 
SSSitgtUOfflIS, Zffi^'VhSOS 
1 Sr^?R0M7KU7S16/Khgn 
stuoiiQ* (7zj.g/u©iesEis») c 
^iRr^ggu, T^7h2©^6E'vh 

|«1 1 VRAMWfll^c 
iS^ROMOT** 

*^ROMT Kl/7¥8 



M x**h2 LM x=fXH L 

s ss s 

B B B B 


pcGm& 


0 don’t care 


PCGn— K 


^ 1 don’t care<7)^# 


7^>h N \ 

12 

20 

25 

8 X 8 - 

O 

O 

O 

8X16 

O 

X 

X 
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mi 

©ia3t?ROM#128K/ KKTt®2QC 
fclTSnriASZit-iSL/^g'o 
rzaTAl/Cdon't care<Z&on\-5 
®»T(iZIZ'vRfc r #g«®a 
CBS? R0M©AKbA£8/ W MWfl 

t7u£is 

sr-FfflZSiZdon't carerszm' 
^IicstjDiassg. x^don't 
carer, ■z<DM&&i izi/cfcOtawEts 
ns?c OISROMrKLy7,©^3t:'Vh 
<z urjtB^jrdt-Krg-o 
r©R»6@eo^n^^re^^o 
£ t ;LB8 X o T> h25ft©1E-KrBil 

gyRAMIZROMAKLAZ^aSA/i/C 
wian^s-fes^rs^z t.titM'O m 
<*3(z, ^©t-RriasacxZz 
ntiaid^o^a^urusesori: 
fcwrwsatfo zma/ \-HfflizBi2if 
©t-FB^siag', v7Riar2Ka ; E- 
s©2f7 ; &^t©r 1 fj©<£3iz&c5TiA 

sr. ^o££?s^©sstfr>;d'c>e 
£Z3rBM©il?VRAMffiAFbA£ 
:d<A!>3Z<ZIZU3:UJ:-5o UXMflUB 

cgada^ 

^IS*?ROM®5Bi»5<ft:fift512X 

?g*A (32x512 = 4KMYh)S/^3fc 

©rg-„ HBizsjjsizs^uriA&as 
©S^ROMftAKbACTKerS^Otx 
aay2CAn3<i^2ii^rR 
^bsg-o si&iagzsu o^a-stf 

U x M 7-x h T'p 


S3.e>nriA«(A) s^ts^sn^g-© 
r, MZ-700ffl©^7Tr>K^), 16x8 

K'Vh©Q3«'«-SH©rJl7>’ / X'Vh- 
#ggie§, i6xi6K'vh©i(asfflt)'vz 
«£t^3ft«mtA<fc©£ft£>r£fer 
SStf. 

Zffl<£3IZUT;l?R0M©F«£®?lA 
xh&ut, SJBWftJSWJ^a^hB 
H?ROM©6000„S«e»57FFF nSWC, 
8x16K'Vh7PT>h (16/WK), 25008 
-Kffl8x8F'Vh7xr>h, 20008—Fffl 
8x8K'vKr7r>h (•fnfns/HK) 
©St32/KhZf1 SSt^^rA^-Z-K 
iiiiCMA/cusgo cForEsrorz^- 
□-KCTaiiSg-^il? R OMF*977 KbT.13, 

8 X 16K'VKZ’^>h«66000 H + J> A=T- 

□-RX32, 2500 : E-Fffl8x8K'VhZ7r 

>hr®nia6000 H +j> twp-zi-k x 32+ 

16, 2000 ; E-Kffl8x8K'Vhr^>F«S 
6000 h + T> 7Ap-Z)-F X 32 +24<ttv5SC 

StBHI IZ^U5<£-5IZVRAMIZ« 

^mt^ays&immwr^n^n-i-c 
<?o M^e3izia±©stWiCiZcFor3<tos 
2»ROMPFb;*£8r8«ffit*£f7U 
<*SIZ256r»jT>iSfc'9£x*;(M A,® 
IZ80„8£US{I(8^Ah2©fg7fc:':yh 
^IIZg-3) £74ah2IZ«gjM)lScF 

u©r<r 0 ■A-^smu^idniaxdFAF 

1IZ04„8, x^ZF2IZ8D 

m-$o sm^mhjv^^-3-^mJs. 

ITm$a-3£ffi©^8g'£Z:<ZIZ«:‘9 

sg'iOo 


z)i \rrg-7J3^s:?ffl^izz>ur 
fe@anr33S*uaz>= ±i5©#inrii? 
©s^atta^sct^rwi*^. »o 
S^&iaVRAM-t©g'<«©> ? FL/7(Z, 
T*zhl izourBa^roeizzfcflo 
a. 7^7h2ia^¥^<zi^ue^«sA 
CcF-sizu^g'o biz, znizw^t, 
si rotftto ^r t \-ss- pria^fix? 

©Jr^QUtfSS&mtt/utfS, TSUfe 
S/T\ ueidnia^fflfjizAtiisg'^r f L/7 
(HSffl^X^^SUSAKLyZ) IZx 
*7M izz>iAria_t©fjr*sia/u£fi 
IZ1S7M., 7^7h2ia^:©^^©fi ; £ 
»*3Mj<itv3fW«£HSHfflwm« 
urfjiz^g'o 

ZZ»3iaSd^<ffi^i«IZ«:i0^g-73', 
2000S-KriM'PUTlA31:SIZVRAM 
iz®sA^n3ffliar74F—□-Frg-o 
;l?R0M©rKL/7®Ari3«fi©VR 
AMIZAA^-Z-K^AnrfeS^^fS 
m&n3iag'tf&iA<y®T>T / J>ug A (T* 
tearevtf, <z-3 > R5®rfiapcG®cFZ) 
rg-c I PLtf3t?ROM#S MZ-2000©:£ 
^ra-Ah^gc^A/vrpcGtur^® 
U AMJtZn-hiT^ZhZ©!^^ 
<7oe3^r2000S-KIZffli0^^r0\3 
©rg-o »tB2000©VRAMa«»nT 
O^AKbAIZAtUADvAaSH^iyO^ 

rsnst^^soot-KrpcG^s 

^g-3©<!:sr)3«o vbi \3ididrg-o 

(Hill S) 


KPoKcfcgx. Lit 

BZa&PolCSoTl'SXi:, t'Ktez 
tT-fceDIT-r. ZKZKtomV <tz$ t'o 

ssPol, $ra, 

I'tltr. Afc'L, fc^iH'fc/it'Tt' 

^fcOTOT+Cte, 

CUStfa'bti* J: 7 4'feOTfc#*£>0 S 
To ft®®, ■7-a77HJ!ftStL,T'#3# S 
L <t 7 o <*##)(::«*«. 

'j2>aA'eHlfcA4iTCi:*ffl 
frCtl'-C < /;$L'oS/-,iHffflgi¥ID# 
OTfeiHJfcJ: < SltST**, JlMItLX, ft 
Pol C [ J *te-hx- fc s ji. T 2> - i: c a- o T V.' 

STC 0 TC-T^< KA'. A'fc. JtPoWrt 
^c- 7 i,'T, ilffiPoH.'-&Ti-fc!' 5 l CJ:fe*l 1 
STOTT, ®IS#StB^ieLT < /cSi'fcio 
55* : t 102 

A©ffi2-3-26#M t7u 
(tt)0*V7 p/O^tbUSSB 
r Oh ! MZKPolHj# 


10 init " crt : 80, 25, 1 , 0" 

20 locate 0,15: P rint “-TEXT 2- -TEXT l-“ 

30 print “l“;:color 5: P rint “0000000 00000000 000 

40 for 1*0 to 1823 

50 poke« &H3S, I , 0 

60 pokes &H38, I+&H800,7 

70 pokes &H38, I+4H 1 000,&H80 

80 next 

90 for 1*0 to 127 
100 for N- 0 to 7 
110 pokes &H38,N*128+I, 1*2 

120 next 
130 next 

140 for J-0 to 63 step 8 & 2 * $ $ ^ r o *M 

150 for J-0 to 127 step 8 : ft 2 * $ & ^ r o»^ 

160 locate l,16: P rint r 1 ght$ (“ 000000 “ + b i n$ ( J) ,7) 
170 for 1-0 to 127 
180 for N-0 to 7 

190 pokes &H38,N*128+I+&H1000,N+J+&H80 

200 next 

210 next 

220 AS-inputs(1) 

230 next 
240 color 7 
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X®y«xXl'4 t. Ctllivt-^WOASS 
■Mti'bcn&gT-To ®# igff (18) ?s#» 
Sf-V-7"(i QP -a-—f — IrMtnT T 4*> x 
tz ! ft IWlf £, 4 '> LFMiflSC'PxX < 
ft-4 tA.*'ft io 

3 A„ fAfc 4 x tz < 10 t Jo •) g£ S 
irotT. i'4, Wi'tlMStLTi.'jm 
14?$*4 BASIC a Set', ?Effi 

© BASIC 3 WW 7 ! IS (32) *1S® 

6 ^-i: 14 a |> n T 1fwW& i: 4 6 

FuzzyBASIC ay.q xgl§ 0 7-t-frSI 

x$g 5 ©14 cl— f-0®3 AX'to 

♦ B-attfcSxXfrfc+WttlMcAXir. fet 

«(4 r fv#V'j tAftX®3i£LJ: * ! fc.SU.'4 
A'fctifct*- F*t#i'Xi'41„ fU, r :*i 
£« 6 » a. 7c fc *& ¥ 7cj A ® I ■' 4' 7>< fc > \" V a > © 
S;g«-Aft.XL4*#0::©C'fcXto fc*7c© 
ti -„ lllT WM. (16) I 1 ** 

r BASICfftfll^j/orjAUI) 4 
to ;iSAnt%sr» 

♦ itiL-, r 7Jb/'t F a*j X*-)i"(>7>$: 
6 ©7cA7cb'o CONGRATULATIONS ©SiSTrttlX 
#;&*<£□ tP»lxX7cA7c4te-o *<r>htb 
itCieiT, *©B(4I8*-.ILX—102:1'* g 
5*i®fBiit«J3:L7c©7cJ:o I'JntCA,, Si 
7ifc0iftXl4ftCfc®fcftXl.'4L'-tf o 

*il* 3|# (20) g«* 
107 >S - — <* Gl'lii fcr'i fcft a -y 3„ lit© 
S'i: 144 « t tC'<.">”7fc/*H'SI4tt't t 
♦tt#-t©®&©7c© 11'-5 - t XXIturboZ & 
aX#Al:SeiTt)6t'S L7c„ ?fcX, 5K144 

A2:V'xX X68000t*xXfe fcfc* t>'t£ -. * 

tit— LX fi XlturboZ l4tXL'„ C ©{t®X(4 C ft. 
tzu<nmw& 5 1 14.o «*Xt. 

Hit *?3i (29) fSH® 
t'T xTV'f 14 X68000 t#mX'S -6 L» C 
ftliliSi 4teHi'i#tS5x'L4 i„ 
♦50©#gi'X,ftt©/''7 a >i:fS-WU tX 
3?B© BASIC £A*LXi8AXa'4 t„ 
MZ-2500ffl©x -> >§g t WK L X # S #* ! * o tz 
fcgOtX < 7Z?L', 4fcL<„ ** #(49) 
An*’ fc fc 4 x t L fcrtcJJB 4 X'ftm#l4M 

SiXito *JSSAXmXAX (trsi’, 


♦"3L'5fc0, TlX2inFATt7-(L2 F U x- 
71l'4riflLXL4 ^fc, 7->>|§tS;bxXL'Tc 
fc#®LfcY>x7cAXto tCX, DREAM tl'i 
#at L L'x V A ? ix -f 7A 5 # 5. C t fcSL'ffl L, 
x A t x a 7©x>4'*<(,) ITgLA-Tj.'* 5 
ib, 4A2:A'S;£5-tfcSC2:A'X# 4 L7c. t- 
l'4'*, S-OS —To 

ttW SUB (17) 5)HS 
•gr3A*>ffil.'C4LT<ftTCfcS-0S 4* 
&X&ito 

♦ '> -T - f(41) x t wit)' fc MZ-2500J1 ©iglgRAM 
4 27MiTIft # 7c x fc, MZ-25204A4tti 
? 414 ft (4, lilS RAM, VRAM J4fB7 7l-* ! /:(? 

AtHfcct/Z^oC.o *'< i'-5fA(4a>/\-t 

© RAM t — K t VRAM fc -a© X I4,800R XI o 
iz<nxh %o gis (17) ##)nm 

T-i:Aft'Pt < h% ft¥i:0 

SC t 4#i'S-t—t'S-ht'Itt', Wt 
0)6 i i4ig*X*l ft Lit 
♦#, Oh ! MZ 1477'IH-7-y SOTa-t-C# 
itzZtbtbntz (t-t^t-©foW$AA ? * 
ttt«5xX4Cfc)* ! , L'S/ZIC Oh ! FM 
#©a-t-IC«L'XS>#afc*?>o 

4fcS BJ (22) ABSiS 
72 A A FM + 17 V KS$*©?-7'x7cAX't 
4o CGif*t7ci47-S©3-t-~#-o 

fc' HT., tiJfcU'SgT'tfc. 

♦@lttli«±»int4bTL'S5litg 
8 t'-y l-/f7 3> r SPC-l500j tl'iTbbli, 
B»AV a > 6 ft 8 H#2l7^-iA©K#IC4 •& 
t, 4 A 2: XI t □ — >4©7;t * 7io ?tl.i4XIC 
llfo < Ufcc*', *4zx tx’-y+gmcftLtt > 
* ! 5 T>fcMA.XL'4t CStfl.42: 71bP'>x t 

a > t a— jux-I 441'©*'4 ? L'tftlctXfc 
?fiaxs«a* ! fFbnstti, xi t> ibmm*o 
• s-t>-ic4xfc? t* as; ( 32 ) a«i» 
Z’sSTAFF f Him* 4 A*> 
4 £B 4 AX* L 4 5 *’» @et HiUbo 

♦ r (t(4fi#+tttf-7;, l—f-447-> 3 >fc 
L'fcufcit) ! j tWxX X68000f 7 — 7 — KHSOTf 
5f-r7X4-SLTUi«li, until 
(Cfrtii'U'OT L 4*4? 

fnfi (20) 151 ill » 
C'PSei:i4fe4CF4tAo #u45ot»ta 


©Pto'pAfcco* s 4 AX'to 

♦ SL©XICk C FDD © CZ-503F 4'©L'Xl4t> 

I A*o WBA'fc4'P^#aA;i:L'-7©tcO-f¥- 
K *J TC0*14*ftX4 to ■?-f/<->fct>xX7c 
(tf, VymtfT 2iX-»(fX U4L'4 L 
fcCo tft*'ibta, Xiro77t<OXT-S7t't-t 
it, 4, 4Atft->a>* 5 4x>#<©*;„ ? 
t * ! (4 XI fcZHfo fm:LTfc7tX?l4iSS 
L'o 111# #BJ (15) 4t;«iS 

472 a >4 out S fcSi < 4 9 ttXIifi 

< 4i'oXA-4i'i Lfc.% *I4I4 o 

♦ &©-, »¥X { Y (Z+(X + Y)) ) 2 iL'*5t$- 
x-/(-*',; 497X (Y (Z+(X+Y) ! ©4i 
tc»i'Xtixfci), iih *iteb%t£\z$ 
T(ft-tX«iitttfc 4 * tt5(*(4L'x4l'4 
A4©XL 4 n 4o -hSS (15) 

Oh ! MZ ©Ik#X'L 4, 4 fc A A ? 

♦&f4tlJfll-S-1»xXl'4-tfcA (I*Afcc:tl43i 

i) £ t* ! )o B©tL'b t*©S*£fclcmt'Xfc4 x 

7c©X-to t LX XI©E#*'l±i-52: Cfc 4X14# 
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4, Z © 6 N 1 B t: li-T^tt© B 4:DECW 


TCOM2400CliCCITT V.25bis^|8l©BS 
C i 4 liHDLC 3 -? y K L X CCITT 
V.26bis 4 JsfJiS ttt’Jo 

*8 y A 7 K fl^Ptr 303 (978) 2090 

A-v^-tU9-ftn 

x^y> 9-SW'>y-LXT 

■tz-r=i-x^v> 

yf^7-7 °d ©ffl!{iifi7— K->sr> 
y-LXT(128.000R) li, **200 

13^aS©#*4fii, 

oTi'S„ 

aii, JISS51,^2 «t 

11 ^ 7 ^yr^-y Y 7 is y b ££•«?>, 7 , 

222^0 

yf • 3 3tt®*wyy-7*-r'-c't! 4 ^ 

m-iHttBt©tt-** -y*«o x 


£0B»-fcyy-fr««£m4\, 1989^1: 
liJia©*M • ZWEIf^prrCtroiTItia 
W^ptf b Blit S i 7 r, W5£M5g4»' J; O' 
SPSWili: b*4*ns 0 
ti±* ? 3 * y - * - © itjifi] 4'* { , t'fn 
b B^-r©fcrite*4’#^^iat:i>'tts-7 

-yf 4 yy'©ttt LtffbffiLti'Str 
ttc, ^*b—l©3Sftu:*t^-c'* 9, a 
±iis B*4t'©a*»t©S'*74H'# 
t Ji ib n s „ 

3 y t° j- — y f y K • j^-v **y * ? 6 N * 
C, ^ f-ft; ^J|X$ 4x4o 3yt°i — yf 

y K«36i£©7 7yft 4 x'r,!;^ a ^BIR 

S* ? , 7 tt 9 

L Xts*), b t b ti£ : b'MffiuiiJbo4. 
z©40^^tt©ti(:IS3>'t 0 ^ —y f y b" 
t'C,, iir ** ? £J*i);£ljU#l4z i t: X 
9 , Jfc04stt t 3 t.°i — y f y b" • -» 
^"y|Jf«Ii ! 4 ( 4o4<blt4'* f , f-E 
JlbEfe9©ll!m^ttS tl'7. 

3 y y f y K • y'y ^'"y 14 1982 
¥7fli:^IH 3 y t“a — y f y b" t 
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A-*' 4 X\ r'4 X7°w4 (iSTNM, 

-T40^X10ftS^o 
ift, 7 — K' f >7xy — 
a 9, > 4 X — i? 

V -*'3 (ae.sooRi'fM ^ —5?«; —{tv 4 
k( 46,sool 1 ])u x t> Aft®+ m mix'km 

ft [ii]\ ~f') >2 (19,800 

R) x*> I Lfty ■9±-i? 1 ?%mt£ E 

frf-Pf L/J >), 7 9 7 74?— K'(29,800R) 
/7 7 4 7^jf7V -y 
I (19,800P : j)T'f 7 x 
fcDtSCU nTltgft'. 

? lit:, 7°') >7 4 >7 7^.4 X (5,800 
R) «r^ifL-C24k' > >g|^r!; >7£|gM 
l ft 0 , ji(S-t -y b (15,000R) X* x" A & 



SjtPffi^tfiiKL'tlfcttLft* 5 ', 2 ^buc* 

a >^-7 

7 > K*i©100%-?-£*i:t:ftoft„ ft © i |t 

4 ftfcaiffi 1 3 7 > k t ©far 

Aftcw-r « i£&©*f&'* f *> o ft x 7 ft*. 

4*0©*—x-ftt. sftw::fuft< 

ft -5 ft *11 li'ifed'J ft * r 4- t 

©*£*'&& L ft 4 ©. 7'/y-7”£tt t L 
t®Muat; t *• <4 £IM;© 
tbtzX 7ft% 

^2flC7x + - fc-»4 7 b77M ! 
&£4H>oft©ti, yfcHx 7 b^ttt £© 
a*i£At©fsi* ? 7 i < i'**fti»i 14-* 
WcSlfcKft^fc*', £©f&4, B^- 
6 Et:7y7°/i'a>t.°a.-7 • 
ttfi^C^L, llfltftl£-?4 7o7"n • i>'\ 
'fycoti&tiHt’bo Ti' So 7 ^p7* 
-#x • >>''°>©Mit«*W.li#;t<ft 
ft o ft© 4 nb^ft'-o /*. 

B *©ftft*ft*'tt, * -f±So* < 1 ft 
LT Ztlii'C>i)iJfc&&lZAZ < , L *• L, * 
@©£ttlit.' I ft 0 At 7 b ftJR* S„ ft 
L*‘t r if o t 
6A^ftH7y* ') #XfSi$llX^ 5©lift 


tl-Cl sSliHfU: o ft If If, * -y b 7 - 7 
C7 7-fc X l ft I), 7-K^^'>7-LXT^ 

flllO* y a > t f"— 7© J P0 t 0 4T'£i ft. 
<0t 

-t /f a-x.7°y >($ 00266(52)3131 

S^aliEA—K 

VOICE-BOX 

pcmua x 

>>-fciM -f—VOICE-BOX (9,800R) * f 
%.%X. ft o ft. -t > b n ^ 7 Xi$$t© 4 > 
77*4 Xt^iL ft''Va>ft ii7°!> > 
**-b*4*lT«fti*ft. 

$ * yi ft#t •; tamumtc's. Aia 
©Ri&ft £ li, ^©i*' ; l|-r © 4 * , ©§&E | J 
4 nl^ft^MfmArtr^ ft. 

i ft, Xl/Xlturbolfl 7 K'X>7' 7 — X 
— a y 7 b r ®il&ft'' 0 x ^*4 x L T 

4jo, Ao^<ri*i:»!)t-r*j»ft#ft«* 
!ffto-£ 9 t:(K L * ft. +4A'(i, ®88X 

H|68 X J£LjT68mm©X-© S„ 

<R3i'-^-4y-t2‘-5fe> 

|nf 003 (837)2595 

-tfB*T^gttft<.'©a>j 
(ICIf^ft. ^ © ib ft 0 ©4r-t y74’0 4 : 
A x 4? »y 7* f J: (i f 5 i < mtb, 
tWfflii^#c,nfti'i5, *H*at 
B *i£A t ©M«li^ L ft (.'©ft'A 7 o 
a X If i' £ © t C. ANDEiitt© A 7 ft. 
1 #-ft-y ft-v 4 X n y 7 h 4 
Ti'i'. L L r feHftS 

tRj «rtULTifti.’ti’5«ettfti'©/w'o 

Short Again 

CD-VUii 

|>CDj©CD-Vy 7 Mf?g^Lft. K 
(7V-7-)li6 ^ l Bt:y'M^-7* f 5l 

ro, M*.'T^ci-r'(_!iii>ft < t4e>Tt7 
^tft. ii’J:i'J;CD-t'**«rPB 
& ft * s i4B*(ft *■ a a, n ft B#fti: ft o ft b It 

ft. cnfy-- • 7-( !) 'y7°Xii£-<7)C 
D 7 7 5 y — liCD, CD-ROM, CD-It* 
bX, -f^Xfii^tZtltzZ t Cftft. 

■feX 7-x/y > 

4:4 3— i/y >©PC-9801 
ftPC-286^x";i/0* s '8 fldiiSf^-* , <4a:#'>L, 



•INFORMATION 

£BW)ttBBS*£0flfll 

B (-lOOOHj<i t'RBIS? ft t 

i' 7 BBSft* ? , ft © ft 0-', -Aft*A. (i* & >1 
%.WL ©fti'ft 7 LftBBSHU©^^-;**, 

illtJ-Jgx.t ft $ i ftPnTOitmft f 
t r ^a^©tEBBSA^j * ? (i? 
nftft tlftftoft.FORESIGHT.POPCOM- 
NETft t'7BBS* s t4K L Xi.' ft. 

B Bf li Bgf062#8 B23 B (H Pg B) ©^f^ 
IB#*' i44B#¥ i 

(A#ft500R)©2»H^S. £t*S*4. 

YAS-NET 7 7-t X #7y03 (943)9800 

ifi(S''°7X-* N81XNN 

fx h ID : ADDOOOO, '7 9- K ; 0000 

BASIC-ROMo & ©7-7> 4 

4l ft . ft ft' l PC-286 *t'> 0 (ft O l' X li ft 

mx, StnTi'ft ti'5!S?fM*'ft(.'. 

74^077 H£S&« 

-a!$Riit: fit, •^470X71'm 
BM-PC/ATOH*»]RE#l«©tt«Urite». 
j£ < h*' ; a©y'°x a >yt — ij — cjgjS4t?r 
Bf-Cf*'!! ft. ^illiTpBflft'* 5 . 15tiCBfC; 
*‘tl, ^©7 A&ttii^R(:i«n a p4t;L i ?. 

ft PC -9801 MSl IS eft ft ft t lifit'Afto 
vx7-4-y I 
mm* L*©y'°x 3 >ifi(t-t- 
-C*ft-7X7—4'-y l* f , zcDtztfX:-* 
ik R3,000 A l: I® x. L X 3?SH—• t" x 4-1»1 jtfe 
i ft. jusT-PC24oobpsi&;aiilfia ? iSi§ft' 
* s , ^t&Wft-t-E'xii^fc©^. 
Lattice C A'* 2 75R 4"t:7) ft 

7 4 744- b li, 19^8,000Rr'SE^4'© 
Cay'M 7 r LatticeCj © tf&RS t LT 
r Lattice C' f —Xf 5f 19.800R7' 7 H 
18BC4l5cLft. ftflliB^^Bi^M^ 
m i L ft-77'-fc -y b 2 7JR£40 9 <■' 

ii'fCsiglir^x b BASIC j i:ftft©*>. 

(K.T.) 
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zcn^tvm r iSV¥j t r /<y • - a-Xj 
IzIftliSnA*®, 4 tzfrb, 

r 7>f • A7*-lfj 11'9 i-3 t 

AWnr-r (d>4 < 1t> r **j 4txii4i')„ 
?T, Sf'L'C7)rt§X-r4, 4A'4A'(Ci**-fcA 
MifcroCiliTl'iT. #x.T*.n(fT'S» 
<t:t T-fA ! , r 4SOT)U15-t)# uti> Kzl— 
+k—(D^ j ti, M-vnx7)-t#T-tJ*i 
Tcfci'j: 9 T-r.nii<n*a«-OTi—v-wv 
L4(.'tS‘; # Ofctt 
«#jTfctf<, 4fc. r i-a-(7)^r*«»S(7>^*^ 

T-fc4l'IJ-rxro fro*T*lli, r 4SXT'H 



*y f n-*r>1fb 1 r-9i ; a.-<r—> a > 

• 3 5 J.-<r —■> a XZd^LX'fc 
M(*T?>A* ! *gi:-r'S»ia5-. SStA"bflfKL 
fc(7)A ! ^»T-*So ±t LXty**3.-Hif-Sr 
***iz, 

ya F □JU4iTI-oi'XS6 / <, S fc/<V 3 >iifi 
^ LAN, tx/fT-'y?*, ISDN (Z 

M$rX*£<MinXI.'*. ?f>C, ZHfcf 

+T-|gc*X-'y h n—9 

^ro***A*, ynizjff£-tr* a.Mx-r<7>* 

#14 iz-31' X t. S® L T l' X a»A;S l'„ 

v.c.-7-=-:y-< 77t-mii5 

A 5fl 264'<-S> 1,800R S03(486)1977 


IZ«g;*ftXl.'fcA-4<7>Ri ttiyfitt. 
A1*W4F>9Si LXIJ, r 1 <V=-V') 4 
7Ux-f7j >9 ta- J P, ft*, 

*ftAroy-A, r7-ya**«C«lz.ttffc*fS& 
4tfc4-oXi'2 T„ 4t*X^$IJ^*(77W;4X 
f. (5£TJ;L' r Sj i!) ! 3Snxi'-5lzt,A'*'f3'by, 
r ®saairl5j (DJ:-7lzaiL,*t>(f-7fcfeOT(Z43X 
I'S-e-Ao **ui'*L'%(fAasnxi''S r a 
ScD^t Lxnzyt'i-fj £18ft LX(.'■&£ 
iyit. (yt) 

y>y • y'-y*-*s 

r /<y . Zi-Xj at'- • i* • istij 

A6¥'J 200^—v* 1,200R S03(238)1321 





A^c7)^®^^±(iVt:x tmm'bU ±L 
/: 0 **(*, vt-t'J^ h £ LTIPIIlfclfcWL 

h T'£> 

So 

Pallid -3T^A<ft)(7)3&\ 

&4/z fc*PU tz < 4 3 

A'feU^A'p ttifva^SDiu:^ 

L*'< 

<7)*'fc.l,x.T # /id: 0 /z, £!§oTV.'£o 

A6flJ 242'<-v> 1,300R003(359)9671 


c<7)-r>T-'‘y>iie— 

E#, ^-vTlI^^nTl'Jto Z’s s 
TAFF PRO 68 K ^ BASIC 4 £T 0) »fc3 ^ 15 * 40 

g(7)S|-tt^l'X68000o *<P>%>mbhr>X& 
■7'>>0>.a.—»f—I'Tl'SJ: 9 Tfo 


#%*« 

I/O X**t 
ASCII T 7 ** — 

the basic &mnm± 

mwmjs 

Hacker 

/\‘VD> r 7—7U K U>t:*a —^-9—JU K • iSV'O 

POPCOM /jY^gg 

v<a> 

V-f a > BASIC Magazine ®jjfc$frlVft± 

LOGIN TZ* — 


7M>y=?*ftZ>tz#>cn>&®.t LX7iZ>Z/^(D^m 
zwmttio -I/O, 7g#, 282 —283pp. 

► **®£1££JE /<ya>*#<7)» 

A*V3>y 3 7 y<7)fiSil^98S^mii»!HCOl'T<7)^ 
THE BASIC, 7g-^, 204-205pp. 

► MS-DOS V-JU • V7 hOi T-flFfiKii 

cAT»ift-rso 

-LUT^^Q, ;fjl|^(j«\ /<va> r 7-7UK, 7fl^ 

53-92pp. 

► '> $ zl lx-v a >y-AHl *40 

y-Ax-tKO<7)ft# 0 7 7 ^a 

xA«^IZOl'To-ASCII, 7 g 

-^, 287-291pp. 

► Take Out ! a > a - ^ 

L' 

y- A (Z 4* o T l' ^ x A^I|^<7)/\° V □ > C <t 

-**SB/H*j»/+lU##/«Ba§ 

*, ASCII, 7^-t, 169-184pp. 

AliS*^^«tL/c r ^X#P^WD-260Fj b r 77i') 

-#^WD-30j -^*SIS, ASCII. 7/!-§-, 

I26p. 

LT>iS^;§I/Tt'S5fe»«. 

f^^y^rA^yt-^m -ASCII. 

7H^, I23p. 

► K ^(7) How To V '> >mmm Z80V *> >H AH* 4 0 

8 tr-y H7)Ap)j[*it|f^lZOt'To -AiRjE5t/%H 

UJ^S, 7^a>, 7^-t, 245 —254pp. 

► y-A^-+>^Q&A 

/77<7 

-V<a>, 7g-%, 240—242pp. 

► 16k: 7 h /\*y a > 

/s- K>-*-^^mi;L7zl6e-y h/N’V a >lzMT 
47>^- 

-HgHSB, v<a>, 7^-^, 195—196pp. 
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MZ-80K C 1200 700 1500 

MZ-1500 

►@j®»iooo f nm<7)/*xj lx-axor 

XbH;£iv\-x;uy-A 0 — m&w/mm&tiLtym 
gflXPvi?hX-A, ASCII, 7 E-§-, 231-236pp. 

► THE MAGICAL CASTLE 

&S&(7)&*'bJ&tiJL<J: y o -SJBHi. 7-fp>BA 

SiC Magazine, 1 ft^, 123—125pp. 

MZ-700/1500 

>&W6l pac-world 

jfcni!-=#?IJ3|. V -r =3 > BASIC Magazine, 7 ft 

121-122pp. 

► 7 4'b^ 

KX—A r 7 4'f)^j £ / \* 7 P >T* 0 - 

, -7 < P > BASIC Magazine, 7 119—120 

pp. 

MZ—BOK/C/1200/700/1500 

► MENTAL 

U -5L<D 7 <- x -r >- x -b z $ <n > x-x- -f 

>XX-A 0 -AO Jr., -7 -f P > BASIC Magazine, 7 

E#. 116—118pp. 

MZ-60B/8000/S800/S500/VS 

MZ-2500 

► FM gif-f ? 

ife(7)^W''/7 7^?tl, ftofcSfe* BASIC T 

ramizis*.*, FMtigif^o —'Mejmeji, i/o. 

7E^. 212—215pp. 

► Hr • /typ^r'f'-jgfflWfE 

MZ-2500T+-W«!lJW«®^Xil4c-*«t|—, v 

•f P >, 7 E ■§•, 239p. 

► £ A T fc Q&A vf/MZ > M-Xffi 

7iUdxf*f ? HOl'To -'>* — X, -7<=]>, 

7 £-§-, 403—405pp. 

► BtittiS ^^(7)a D n ^ 

*£ "9 !!-UEEBfiSfh, V -f P > BASIC Magazine, 7 E 

■§■, 131—133pp. 

► X • y-A • * 3.—$>*y * • Xp XX A SILPHEED 

>7L7 -f - KOBGMT'fo -3AI8, 7<P>BASIC 

Magazine, 7 E #, 178-180pp. 

► Computer Graphics Animation ^3® X — 7 x y 7 
tf'J >X'7-JL 

7 A-Xvi-x-r >X2TXtf- h 

X*X»J >X7-7U 0 -UlT*. ASCII. 7 £-§•, 225- 

230 • 325-339pp. 

► MZ-2500H2HD/2DD K 7 < Xfc 

MZ-25001Z2HD K7*f Xfc&ITf Ztz#)<n4 > ? 7 x 

-fX<7>i¥fE 0 -ANOM/^lilil^S, I/O, 7E-§\ 140-14 

4pp. 

MZ-2500V2 

► ^XIt*XX*?QXA 

4L'^f L«!) 

5XX*?';7AXpXXA 0 -tfcffljJS—, v<p> t 

7E^. 255-266pp. 

MZ—80B/2000/2200/2500 

►^7^7/y 

*<7) _b<7) * 77(7)^73" £T*' l o'9'9l'T tjhf//- 

#-L®S£. 7P > BASIC Magazine, 7E-§\ 126-127 

pp. 

MZ—2000/2200/2500 

► Change Color 

9 o -XMAS, 7 < P > BASIC Magazine, 7 ft -§-, 

128- 130pp. 


MZ-2861 

► MZ-286l±T*tK a>-7 • 7 7 h r MZEXj 
98 x 5al/-^ r MZEXj T7vt-4'77 

fc'Xrt'frXx’yXo -*i£SB f I/O, 7E^. 226-227 

pp. 

► TEST ROOM MZ-2861 PC-980II $ jl/-??rf&IiE 

MS-DOS, 7-Xp, 98x £ —?fc£’77 h 

Xx7i:oi'T»lftT*o -iffi£SB, ASCII. 7E^. 

191 - 194pp. 

► JSHH6L'*y h/\’7 p>p - KX7 h 

PC-286, MZ-2861, PC-9801 VX2<7) 3 fltttlZOl'T, * 

7<P>, 1 ft^, 154— 158pp. 

► >*-X MZ-2861 x * al/-‘> a >-t — K 

PC-98x £ t/IIPglZjtS 

77 h$r$SfTo -Siffitt-, 7<P>, 7^^,147-15 

3pp. 

Xl/C/D/F/G/turbo/ii/m/Z 

XI turbo 

► iS&X'T > • JL~X> 

HuBASIC CO 5 — 8 fg<7)&£ TlftfcffiB L $ T 0 -U- 

K UOTA, I/O. 1 ft%, 206 — 21 Ipp. 

► ! 

400X0*- K T*7-v\ , --f >tf-X£nI*Hz L I 

To -I/O, 7E-^, 136-139pp. 

► ttAT'k Q&A Xl/Xlturbo/X68000>'J-XJffi 
Xlturbo<7)>7 h *-£COPY*-£^B$lZt?T t Hi 

b ( £.& L i -v-\» — 7 r , 7-fp>, 7 

ft^, 40Ip. 

► SYS 

T«^XU> HTO hT'#S<±milXPX7 
A 0 -7-ru> f 1 ft^, 348 —356pp. 

► »f * /<7 □ 

XIturbo T*X^7 -r >y (C BASIC ££W)T Z> 0 

-, 7<u>, 1 ft^, 239p. 

► Hr • A*7 3>t>T-iSW 

XI turbo <7)2D f-fX^^I<T5 0 -ffiffitt—. 7>f 

P >, 7 238p. 

► ttA,Tfc Q&A XI/Xlturbo/X68000'>';-X«S 

XIturbo/IKC CZ-520F fcOfcl'fcfiR-g-i::, 2HD, 2DD T 

BASIC -'>-f-X, 7>fD>, 7fi 

■§•, 401-402pp. 

xi*>y -x 

►y-A7 7 h&iip-f— 

(±HKS) T-g|^i<T5 0 - 

Hacker, 7 ^ ■§•, 97p. 

► Hr • A-7 3/^yf-iS* 

xixfg««(7)^«Ttt«:iH^ro —7-r 

p>, 7 238-239pp. 

► t.9t<‘Mlt 

7 7 > ^ *> v ? K t t 3 >/\*x;uy— a £ 0 —ta 

y < A TM., 7< p > BASIC Magazine, 7 166- 167 

pp. 

► DESERT MAN 

a -NAMKO 2, 7>T 

P > BASIC Magazine, 1 ft 164—165pp. 

► ■tf*^»as+@5*ci£& f-r-'y? 

yx h XWX-(Z^ IJ >>at • '>+-?#< 

7- !-$BH?6,x^7^‘;x, 7 I25p. 

► 4'ATfc Q&A XI/Xlturbo/X68OOO'>'J-Xi0S 
^ExA^-$f-7U CZ-I33SF T* BBS C7)rt^^XU 

-'>*—X, 7<n>, 7^-^, 402 

P- 

X68000 

► y Z’sSTAFF 


"J - 7U Z'sSTAFF PRO 68K t£ t * JSf|- 0 -SI SB. 

LOGIN. 1 ft^, 204-207pp. 

► xesooo^cT)^« xxx-v a >7-;u, a L 

PAX 

X68000ffl(7)^- « ^-7 UXpX7A/c 0 7-7 'J X h T 
Jilt -iffimSB, LOGIN, 7 E-S|, 240-243 - 334-338 

pp. 

► X 7 7 -f v ^ TiS.vt X68000 BASIC 

X68000<7)/77<-y^li: BASIC />' b <7) fig l' ^ ^ 
Blfto -«SmSB, POPCOM, 7E#. 110-115pp. 

► X68000'\-y f>-X7Xx77U 

X68000C7) OS^T-tZ >X7lZOl'T<7)ftmfc IU X'J 

K^y/s^ypX^Ao - , £E83|j, I/O, 7E-^. 

257-263pp. 

► X68000<7)£®S&[H 

X68000C7)±®3SH](7)(5*', I/O h<7)7 KUX^fJ 

I/O. 7fif, 

249 —256pp. 

► TEST ROOM X68000 ^P f 77(7)/:^(T)7i! >/ 
7t7)»tt(D 

e ? i # m st 7 -tz > x 7 < 7 )i$ jebj> a 

IZ-91'T, -ISHSB, ASCII, 7E-t, 195—197-312— 

315pp. 

► f- y—A - ;a-v7^ -/Pf7A WEC 7U • 7 
>24 

b'-r*y-A WEC )U-7>24<7) VGM Tt«- 

7 < P > BASIC Magazine, 7E-t. 184-185pp. 

► U ^ T Q&A XI /XI turbo/X68000 > Q - X«S 
Human68k T<7) + -Af)^^<7)5a)^7 *y X<7)^-jfelZO 

I'To -v-t'-X, 7<P>, 7 E-§\ 400 —401pp. 

► U A,T’ti Q&A XI/XIturbo/X68000v U-XS 

v ^ x A|g»)^f <- (I XP XX A ^JZ'7 
I'To -—X, 7<P>, 7 E ■§■, 400p. 

► BASIC Xn/7 $>yf^Z>y^ (*7f 

IS) 

X-BASIC <7)7Ij7JH7A't7Z7 

fLT BASIC ^r^fiaT>X)U$-JSfho - 

Bfttl— 7<p>, 7E§, 180— 186pp. 

► X68000igfflW^: 77>y> a >P-)U&IOCS>Sffl 
>£ 

IXS<7)m®^^IWL. 7 7>^>3 >P-)Ub^)t7tt 
-S«-tS, 7-f3>, 7E^-, 17 

2-179pp. 

PC-1600K 

► PC-ieOOKffl^T-tz'xX^ 

±^\*>^, ±7 K>7£i£7-fe>X7LT'#3, □ 

X^ie<7)J£7t >X7„-CASTER, I/O, 7 E#, 145 — 

147pp. 

►^P>^i';4'f9 i i»^s«tBi#«K«x 
p XX A 
PC-I600K 

A/^> MZ-IXI9T"llg?r*'(t7z*;T'# -5XP XX A ti 0 

-7<P>, 7 E-§-, 338 —343pp. 

PC-1500 

► X>-tz *y h • 7'JvX 

l4?l?l<7)tt?r^l'^lT«bn5>®;»^XP >7X-A 0 

-7 <=]> BASIC Magazine, 7E-§-, 

171-172pp. 

PC-I360K 

► —AfiB<7)X^Af)^/T?X P > PC-I360K XT'!! 
^7 -XpXp XXATA^L/cX:*^, >^-)UP 

>/<-? CE-I30T ?rffll'T98<7) MS-DOS <7) 7 T < 7KZ 

Iee£o -7<P>, 7E-t. 359 —361pp. 

PC-1245 

► BATTLER 

it, 7 < P > BASIC Magazine, 7E^, 170p. 
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FILES MZ 















□RIVE ON 

c <r> a —t - Ttt * — 9 crfi * <r> r 

*Ji.£*87TL5t„ fl-tOT!5*CM 

t 5 2 l-#- h Tt» 

•tl'ftl'OStl}, 3.— Yf-imr>1z-? 
□ ?'7A£p<3gS=l'7> K£|5|^<7>®£:T-f$* 
% LOTfc'iSU.' Jr, 

t fAtiCP/Mt’MS-DOS&t' 

iH-i tz Z £ (i *7 ^ •ti' A- ^> { , Human68k<7) 7 
31J, 3-tf-ifribIT 
fri-U»sroi,'< tntLii, t-ftCLT 


b, r Human 68kAHj < 8l'«):£7;i7;k 
IzmVT^f&tzt fc.fA'S Lfc, 
ilJH gjfc (28) MZ 731/1500, XIG *JH»: 
• Hk^lzTX r C tl*'«(7)iiffl(7) 

v->>j < Jt,A'lt£-r o 

t. fAi 

DxeSOOO/rlS L < xtzi ‘) SttA.,, LZi'Lt 

<7)buC, g-9-OT 

U it. ft® S X }A t (i‘ t’A <t 7->>T't¥ 
KASItfti:', 

I'Tli^yil^X-IttiSEAT-Li 7„ /%— K 
11 t(:a« b'mtLWH^ibU^'tf} 
■h/crtTSl'S Lfc„ 

*ffl »i£ (20) X1F 


3-ftA/S*l\(D 

□- 7 — 


6^-§- Fuzzy BASICS 7 

3000hKS(7)H>/n-<M^<7)®)^HS^/}<^IJ £ 

L/z 0 U * b 3<7)jifIE£;&Q;iT </z£l\, 

5 n S-OS “SWORD" mvh 
TYPEv > KT* “More" (7)./•;/-fe- 
<7)IMT(ZTMi*r£>U 2 L 
33F6h CD 53 34 


3453h F5 CD F4 IF FI C9 

£ fzMZ-2500XRUN=l 

V> K<7)Pg<7)G-RAMiligX K U*frlSo Tl' 

£ Lfz 0 

FE96h 3C — 3D 
i:^!ILT< fz£i' 0 


7^-i- STORY MASTER 

fj-^Z'y b t — 7'^(T) □ — K tfrJE^tZfrtotl,# 
i'tK.'i'mkt)'-%±L£Liz 0 U*bl<7)JU 
—< tz£i\ ZfttzJ: UF (FS) 
(7)a v > K*riiiP $ti£T 0 ii^-r —? iz 
(2F£, > — b7 rj JUZltFSZfrb 
*'UtffWLTn--K£^oT<£<*L\, £ 
/z, £1&)U—^XzfSU/r&U £ L/zo WT 
<7)KfiE^*P^T< tz$l\ 

3AB6h 57 -* 4F 

3AC7h 72 — 71 

* <n (5 /)'3008h#' 3042h £X'(Di-Hz') 7 
IZ □ ^ ^AoTl' * LfZo me4'5^liOOH X' 

S«>T < tz$l\ 

7E# astizajaxi 

r f*f£tZfcti$X1j 0>MMLCWT0>/<^A<a U 
iLfco 

1. — 

2. ^£Lfz«(Z<fcoT^aW«a 

3. ^S^WitoTl'^x^Tx^^-rnXL 

£ -7 

lTJE^>i(i. V * b 2 “CHANGE" 

<7)7 y TJU^X-tz-7 £ To ^<7)/z 

tf>IZMMl_:/ □ ^'7 A3rft<7V\' 7777^H 
-itzcn-h tz, 

NEW ON &HB800 
LOADM “MML. OBJ" 

LOAD "CHANGE” 

RUN 

SAVEM “MML OBJ”. &HA 8B0, &HAFFF 
tLtto 

£tz , 5 ^-^l25^-v<7)02-2XOP2^OP3 
(DLvX^S^fflZ^oTUjfo L*'L 
_Llfi<7)lTiElZ J; «J, r V7 h WtZli®2-2lZ^ 
lj J: otZ^‘J £ f<7)X, Y=i7>K£f$') 
X < /z $ t'o 

£-£A,ft\ turboX^Lii 
6 ^^53^-ylZ^oX^LX < /z 

cziz^ieLit £, 


A965 : A3 

IF -> 

07 

07 

A9D6 : AO 

IF — 

04 

07 

A9E5 : A3 

IF — 

07 

07 


^i'Ki:T'To 


|JX b 1-1 STORY MASTER *'>7^ 

350B 3A 54 35 CD A3 IF CD 09 : 28 
3513 20 38 38 3E 3E CD F4 IF : EC 
35IB CD 9D IF CD BE IF 2A 08 : 95 
3523 30 22 70 IF CD A6 IF 38 : AB 
352B 22 2A 74 IF 11 32 30 01 : 53 
3533 11 00 C5 E5 BD B0 El Cl : FA 
353B 11 FF 31 BD B0 CD B9 33 : 97 
3543 3A 54 35 FE 01 CC Cl 35 : 84 
354B C3 77 32 CD 33 20 C3 77 : C6 
3553 32 00 ED 5B 76 IF 1A FE : 27 
355B 46 C2 77 32 13 1A FB 53 : 2F 
3563 20 04 3E 01 18 02 3E 04 : BF 
356B 32 54 35 C3 77 32 : 27 


SUM: 62 59 A4 04 96 B9 AE 5E 63D8 


3E69 AF 12 
3B71 35 CD 
3B79 4E 35 
3E81 E5 CD 
3B89 70 IF 
3E91 30 01 
3B99 74 IF 
3EA1 01 CC 


BD 5B 76 IF 
A3 IF CD 09 
2A 06 30 22 
A6 IF DD El 
2A 72 IF 19 
11 00 11 FF 
ED B0 3A 54 
Cl 35 C3 12 


3A 54 : 2C 
20 DA : 94 
70 IF : 94 
ED 5B : 7D 
22 08 : 8D 
31 2A : AD 

35 FE : FI 

36 : CE 


SUM: 2C EC 49 F6 7D A9 75 D8 5607 

32D0H 55 35 

■;* b 1-2 STORY MASTER 


OH 3A 54 35 
OR CD A3 IF 
CD 09 20 
38 38 
3E 3E 
CD F4 IF 
CD 9D IF 
E CD EE IF 
ZA 08 30 
22 70 IF 
CD AG IF 
38 22 


2C 2A 74 IF 
II 32 30 
01 It 00 


1 8LOAD EQU 35088 

2 *PASS2 EQU 3E69II 

3 XGETCOM EQU 36128 

4 XENOGET EQU 33B9H 

5 XFI.BUFI EQU 30328 

6 XFI.BUF2 EQU 3IFFH 

7 XHOT EQU 32778 

8 XPFILE EQU 35CIH 

9 XTXSTAT EQU 30068 

10 XTXEND EQU 30088 

11 4FILE EQU IFA38 

12 4ROPEN EQU 20098 

13 (ROD EQU IFA68 

14 (ERROR EQU 20338 

15 (FPRNT EQU IF9D8 

16 (PRINT EQU IFF4H 

17 (tTNt. EQU IFEEH 

18 (8BFAD EQU IF76II 

19 (IHEAD EQU 1F7 48 

20 (DTADR EQU IF70H 

21 (SIZE EQU IF72II 

22 

23 OFFSET 0859B-XI.OAO 

24 ;-. 

25 ORG 32D0H 

26 DW XFCMD 

27 ;—.-. 

28 ORG XLOAD 

29 5 

30 LD A.IXFltEI 

31 CALL (FILE 

32 CALI. (ROPEN 

33 JR C.XRDERR 

34 LD A, •> • 

35 CALL (PRINT 

36 CALL (FPRNT 

37 CALL (LTNL 

38 LD HL.tXTXKND) 

39 LD | (DTADRI ,HI. 

<0 CALL (RDD 

41 JR C.XRDERR 

42 I 

43 LD HL.I(I HEAD I 

44 LD OB.XFI.BUFI 

45 LD BC.I7 

46 PUSH HC 




3536 E5 

3537 ED BO 

3539 El 
353A Cl 

353B II FF 31 
353E ED BO 

3540 CD B9 33 
3543 3A 54 35 
3546 FE 01 
3548 CC Cl 35 
354B C3 77 32 
354E 

354E 

354E CD 33 20 
3551 C3 77 32 

3554 00 

3555 
3555 

3555 ED 5B 76 IF 

3559 IA 

355A FE 46 C2 77 32 
355F 13 

3560 IA 

3561 FE 53 20 04 3E 01 18 
3568 02 3E 04 

356B 32 54 35 
356E C3 77 32 


3869 
3E69 AF 
386A 12 

3E6B ED 5B 76 IF 
3E6F 3A 54 36 
3872 CD A3 IF 
3B75 CD 09 20 
3B78 DA 48 35 
3E7B 2A 06 30 
3B7E 22 70 IF 
3881 B5 
3E82 CD A6 IF 
3E85 DD El 
3E87 

3E87 ED SB 70 IF 
3E8B 2A 72 IF 
3E8E 19 
3E8F 22 08 30 
3B92 

3E92 01 II 00 

3E95 II FF 31 

3E98 2A 74 IF 

3E9B ED BO 

3R9D 3A 54 35 

3EA0 FE 01 

3EA2 CC Cl 35 

3EAS C3 12 36 

3EA8 

SEAR 

3EA8 

3EA8 

SHAH 

3EA8 


47 PUSH HL 

48 LDIR 

49 POP HL 

50 POP BC 

51 LD DB.XFLBUF2 

52 LDIR 

53 CALL XENDCET 

54 LD A.(XFILE) 

55 CP 01H 

56 CALL Z,XPFILE 

57 JP XHOT 

58 ; 

59 XRDERR 


61 JP XHOT 

62 XFILE DS 1 

63 ; 

64 XFCMD 

65 LD DE.(IKBFAO) 

66 LD A.(DE) 

67 IP AOT JP XHOT 

68 INC DE 

69 LD A,(DE) 

70 IF A:'S* THEN LD A.l ELSE LD A.4 


71 LD (XFILE),A 

72 JP XHOT 

74 ’ ORG XPASS2 

75 ; 

76 XOR A 

77 LD (DE),A 

78 LD DE,((KBFAD) 

79 LD A.(XFILE) 

80 CALL (FILE 

81 CALL (ROPEN 

82 JP C.XRDERR 

83 LD HL, (XTXSTAT) 

84 LD ( (DTADR),Hl. 

85 PUSH HL 

86 CALL (RDD 

87 POP IX 


88 

89 

90 

91 

92 

93 

94 

95 

96 

97 

98 

99 
100 
101 
102 

103 

104 

105 

106 
107 


LD DE,((DTADRI 
LD HL,((SIZE) 
ADD HL.DE 
LD (XTXEND),HL 

LD BC,17 
LD DE.XFLBUF2 
LD HL,(IIBFADI 

LD A,(XFILEI 
CP 01H 

CALL Z,XPFILE 
JP XCETCOM 



'J*b2 MML 


100 

MEM$(4HA8CB,5)=HEXCHR$("C9 

F5 

FE 

48 

38") 


110 

MBMt(4HA8D0,8)=HEXCHR$("0E 

47 

87 

E6 

30 

BA 

DE A8" 

120 

MBMI(4HA8D8,8)=HEXCHRS("D6 

18 

ED 

•14 

80 

47 

78 01” 

130 

MEMI(4HA8E0,7)=HEXCHRt("00 

07 

CD 

C7 

AD 

PI 

C9 " ) 

140 

HEMS(4HAC99,3)=HEXCHR$("C3 

E9 

A8 

") 




150 

MEMI(4HAC9D,3)=HBXCHRI("C3 

F0 

AF 

") 




160 

MEMI(4HAD68,3)=HBXCHR$("C3 

D9 

AF 

”) 




170 

MEMI(4HADC4,3)=HEXCHRI("C3 

CC 

A8 

") 





180 MEM$(&HAFA6,1)=HBXCHR$("00") 
190 ' 

200 FOR A=4HAB23 TO AHAB63 STEP 2 
210 D=CVI(MKM8(A,2))-1 

220 MEMI(A,2)=MKI $(D) 

230 NEXT 


UXb3 

SMI CS PI 3F 

SPP1 ED 73 FD 3F ED 7B 6A IF 
3FF9 CD II 41 31 M II C9 

■.- - -O Fy- y Wjg f fy ? "XT * r V;' - 

fclBU-'-g-h-tt-ttfiRRIJt LT, 

3. to Art*. 8 


s03(263)2230GEjB) 


3. ft, Jz <7Y'<>9--v-'r-M.<nm^i 


J3~£BS016 : 00-18 : 00 


5 /if::# it*' - , *STI7u 

•3#uESiT#3lW. -7*< fc'^L'o 


190 Oh! MZ 1987.8. 




























I 

< 4x\ t, 

s|!:@iT 1 17 B*t§XT4, 

T(JVi: L S Lfc„ 

> - * ■—S4±c li- L' L X IftA. x- b b L 'tz L' 
n- FZfn-byy-mfffaH?, 
ixf-f?S--S-*^4iEi4'^ i'S'.'S4 
Tjatr-b r i*sws^ii^mftSj c-fcD'jii 
*.^Anxi'jr 0 mir/7Ft 

IIA(t L-f -5 4MZ-2500ffl(7)7’P 7'b A fcg 
ig L 4 t tz „ Irc#<7)® $ A,<75®*sti l 'ti'frX 
Li 7t>\ 

frvvm><n : ,mrz>a*m<mmzit, 
mmmz l4 itnisxcb 4 i'-i:4b, ©; 
j; u < <nz t 

*itr, 7^7 

/LSrt'fcLtlSitA,,, X'-frt\ r i@Ij<44'T' 
mt'txxz*. *uzz-tb%*1&x>i.7izti 
Zbco, v-y’aZitLibtTZzcnmm 
m\ £<T)& nzmtLxi'< fr, ti 


SHIFT BREAK 


► W<tlioJ:-rS$*tL'-7OT*<*5 0 «(£>«•& 
(i+f • /<> FA ; Xftt4 A> K«®S;-oTCO(J;^* 

xx 'j 5-;gi;;*-tts„ «OTitft4xnj-yji 

<7)AX, U=l— KISJOTraoXOO KOTT’Jl'/'CA# 
iMLtlXl'fcb, 

it 5-Si: LXMzh\.'b'i)'tzb7„ (T.T.) 

► .A-7-f>X1, *«»ll, t5r 

-I- ”7 7 i: 'f-L.tnit L z- 5- L tz b a it?- * f- *s»i 

^xx:xmit'/> l<7)=m^ KE£b .e-F 

Q7tW7t7t?7yy?ro3 >1t— F 5-IJ L — 
Lt:b, J>£‘)<n®a<7)iIi.'(:^*i:it4AX' J t ) i: 
«CCi:LS>J„ I 0 

OT^SItlFfcbJCLS Li 7„ (K.Y.) 

►SBCTCJ: 7 CtM^FexS 

S„ r OO?'A(7)7K* ; ttnSJ X'S )tXXBj t£Z 
ffaiasxvhj 5-si'ffi?'tts < t7Yi- 
fmmzifthtzis#- F t*So LA'L*Alcli»S 
ffl#* ; *S 0 4i:A7Ki*<7)A4'ttl4<4-5Tfe#F 
TK/c'itr-i?Tints tz^unx-hb, ti'-jib 
!tTS-7SL*g5-Bjiarsxi:i;L<t7o (MOK) 

► X68000(7M^l'7j o FINDi:SORT $:1£-z>X 

5-ftU iLii, BS3C4A.X tWttfro+Lft^T 
oTl'S1-„ ifctlo? ~ 
t7)#lI4ATS^4'olti:S-p4 i: # IC*ot* 
W5¥»5-i.'t>i'ib?l<<7)lti:-7Tt ) H®J 0 cft4b 
S¥#5-51 < t 7 -#®S4t x45-3 >fa-* 
^Itt^oTttiSo 7 -A, *%AI«%A,»(IMT) 


fc'i'i:*ULj;i 0 
▼ #SS?;?tlTA''b 2 ^WJiCDtcbfcS-OStr, 
Stc^OTi^5rJ£(fi Lfco FM-7/77KSS-OS 
" SWORD V N'Xjuy—A(7)#5?&1 '^777 

KWRITEfc*Pt7-7T».'rr<, St;, r i-tf- 
* ! WTTV.'< v->>j 5rtfcljlL X t' &X68000 
(C(i, S)f/cC r X68000BASIC AHj tftai 'I 
il tzo z-*1.5-#i^t>LXi'i-ro 

► Kl*itt7j5r(tL*, HjJE<DSA'bfc-##<D 
tSUJ, 7 R [ZXr>Xt)'b b&i’&T'MWiit. 
7FS«B#SLfc„ r X<7)@^(ClJ^mt.T 
UtSC4‘7, i#S<7)ili:4SXL i 7 j i:(i 
* £ t $ <7)^m^$8<7)# 0 fc i: * **<4ilX 
*oXfe, X=(J‘7 r T‘7tSj i:«Il$nxt 

£ 7 <X»X-(t4A4'A'ilBi;StXig4tlt) < LX, 
StJ-rsa?'.' LX L S l'i Lfc„ 

<7)Ao.-At,A-7XL'*-r„ 
7f-y|:M7-lW?Si, tz£ izitt&^L 
o < tJWftimfct'l'Xl i 7ta„ 

► ^UX»W(7)X-y-tX (S, 

4 ‘J * Lfc« &B^fi'hinmL£T<nX-£ 

tcfSH^fcSai'LJTo 


Pascal, ^>4'/cc7)^^(Si:'Z 0 fotzLcnfc 
7> Kcto ALGOLS Modular£&* U 
^(7)^0 FORTRAN, RAN, RAN, *y 

^-FORTRAN, RAN, RAN, 1-y*, FORTRAN, 
RAN, RAN, i?'y**o turbo-C(7) 

±^*S£l' 0 (G) 

► l *> ‘>1 — X 

>TT £>) 

r ^- —, v*'J-yt>/1 -n'J yt>#'J-vt 
'J y t y ^ *J — v >/"T' 1 J T* v v v \/ \y \/ \, 
v v >rH U — is f U v -v» U — v i» U ^ 
■\» ‘J-yt U7*yA7 ! j 

h (K.S.) 

► r ^-D, 1 • L -A?j t'< 

$titz m cnx'Hki 

<7«R^&W»>|i|T# s^ boxn, 

(?) t3g^tT^^r<%0cc7)ki 

Tto (IWSI<7)K0) 

Z> r T R 0 N<7)^Hj6W 
<®J bLh 

■otztUzb, 

t>(7)4'(7)TL<t 0*'? a^cov^u $(ii^ff|(ZT 
R 0 N£BW±.lf£ftf, ^Cfnf:(t(7)»'' 
^)-l> t>C7)4'(7)T'T*'? ll*^AT</fcfl'o (M) 

SRbTl' 

ZttztzVM&ttiKZKtilfi, ZzlttXhmi 
Wi:4'?> 3 fzti'VyftZ UUz ^ SSL/zb, K.Y.ft 
(Z r 4U'*oT^T-t>77>^'0?j £l' 
$ ^ U £*)*?b'i&nii-fr-? U > K 


-*- 

•jg«(z(i f W •»«• 9K 

• mi • 

«• V< n>g|^eLT<fc'$i'o 
•7P^7A^si?n^[i, 

<7)1^0^ w$ : & X'Ztltf? 

>t , J‘777 (Ty>la(7)ii^) 
C, 7D^7AH- 

7'Uzt—7 (f<^7h) ^r^TJ5 
i/Z, 7P^A(2flrfg:2 
[Uti-tz—7'LT < tz£^\ 

BL 

# t T < /;?l' 0 

mL/z/x- 

LT, ffe|^^<7)-®Sm, 
Miffl7P 77L>*m^mUz h<nit 
i<m i JW: L^fo 
-#— 

^>T5fe 

=ri02 m^mtffl^A^ii2-3-26#^ t:';u 

0*V7 h^O^diRS^ 

Oh ! MZ r @G@® J ff 


^<4W:^>?4o m U) 

► OL'^fiX68000^S^/;(^'U QOtzi}', %B M 

Z-2500V2 T L S o fc.Ol'tlltfA fc 1*3 
T/x e 7ii4'^Ct,^fcbtTl'^aZ(7)Z^ 0 A 
X, 0h!FMX'*y hT^Tf-^-y k tl'O 

(7)*<0h ! FM(7)miS/zo 9 - A, IfAMJjm 

k'4tWLfco (U) 

► yfeB, ^C7)^;^C7)^9 7 ) 9 ; 5LA^^, lUT^ 

LAzo X1,tS.b'r>tz<»X 
tb\ UizLh^ftlin-Xusmtzrttz^bh 
1 xmt'b&i Xt^t 7-Xu ^ToTl'/z fc(7) 

Matrsfiru ^ u o 

LT£^L 

TL^^Tto *&. ^o/z 0 (N) 

► 37> K^E— KX3t^>_h(fT AUTOEXEC. BAT X 

^RAM 7 s < Zk ? (ZfcnlT*'«b fc'7a 7;U7x 
AbZZX7-7P(Irr<(7) 

tzt)', #«t 9(JBASICX7P 
o/zbf-t'f^ K7 P-tz^.X^7T'-f 7^ ^rTtl(i' 
BASICtZ'Jfnii'^Ail^^X Hi^oT?> 
-¥V.'Atit)9^LXi>,2M/\'t' h<7)1t#, (Ca) 

70U7-7°P^iT9 LT^A^(Zron^<7)*'ct <M 

R3 $ n/z to/z 0 r /zo x+u -r ^cai^j&^pwjx# n 

A^rUl'diLXl'fzo iiC^X 

(Z l'O fz(T)tz b 1 o a (J.is/c l J Xj 

4'AT-ti-^ -f >^'y X^tH^ia 

AX<n/;(7)C. 0 (T) 


i^i 

















1987^ 9 B % 8 Jf 18 B (ikMft 

MZ-700l=7WfiB(£ttU 

MZ-a500 MMLOXtO-HT’-yJ 
PC-8001 /8801 KSS-OS“SWORD”#gi? 


wmn\ b : ,r mmitmiRis 


microOdyssey 

«f, *C45iK«fcBa'£l8!<!‘n?,. ft 
ofcfcOT*''#<, za Jlb-ffij 

r IL*''^<t#j tl'-5-f¥q a p* ! 
8SHC 4 0 £ 1 fc'„ - <7>fFn Q nXiS**«|0)£>£ 
££fcLX, * —7 

K y * * fcft.-SX-;&<7> £«fA X x £ 0 XPg 

-ns x-(S&«E#-=»trti c n (ot>'A$- <nm 
stfc'ofco tzzt> i &&immtu- ti: r «OT 
fj £l'i {j<7)5r-i>iELT<.'?> A Wl'Jit:, 
- i: i' -} m&tfg# Ltzt $ uwm 

^<7)m--u%m.t LXtt*£S*jAif. 

$<7>f 

5-fflUi)lf^¥tf-ir»a4' L, &<7)lfM6£ fcfS 
Asat , &.<nz-itmm.vteuubu i.'tL'9 
^* ( |5)5l|X-lU|-«nTI.'fr<n/; 0 £ LX, Z<T>& 
<7><s-t u o nas-Wjt-r sfc«)<7)W5cij*i'(i 
<c$n%ctt:4-ofco L4L. 

I'A S -j, 
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